Discussion :

[_alex_]

Bonjour, je voudrais créer un bouton qui me permettrai de lancer le fichier renseigné dans le champ de mon DBEdit.
ex : dans le DBEdit : \\nom_du_serveur\toto.doc

j'ai l'erreur Types incompatibles avec la ligne suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ShellExecute(0,'OPEN',Dbedit4.Text, Nil, Nil, SW_SHOW);

Que mettre à la place de mon DBEdit4.text ?

merci pour tout.

[Cpt Anderson]

Eh oui car ton Dbedit.text n'est du type attendu. ShellExecute demande un type pChar.

declare une varaible de ce type:

Var
totochar ;
begin
toto := Pchar('Dbedit4.Text');
ShellExecute(0,'OPEN',toto, Nil, Nil, SW_SHOW);
end ;

et le tour est joué !

Joyeux Noël

[_alex_]

ca marche mais seulement après une petite modif :

dans l'affectation de toto, il faut mettre :
toto:=Pchar(DBedit4.Text); // sans les '


en tout cas, merci, ca m'enlève un poids

ps : joyeuses fêtes à toi aussi