Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Ayuda Pls Tedit y OpenDialog (https://www.clubdelphi.com/foros/showthread.php?t=34731)

papu24ar 18-08-2006 23:02:05

Ayuda Pls Tedit y OpenDialog
 
hola queria saber como hacer para q con un boton abra el opendialog y al seleccionar el archivo en un tedit aparesca la ruta del archivo.. se entiende?
por ejemplo yo tengo esta ruta c:\miprograma\miprograma.exe y cuando haga click en el boton (examinar...) y buske la ruta del exe ese en el tedit aparesca c:\miprograma\miprograma.exe . espero me entiendan y me puedan ayudar :) busque en el foro pero no encontre nada :S

Caral 18-08-2006 23:11:12

Si trabajas con Delphi hay varios ejemplos de esto, revisalos
Saludos

Caral 18-08-2006 23:43:46

Hola de nuevo con esto lo haces:

procedure TForm1.Button1Click(Sender: TObject);
begin
OpenDialog1.Execute;
Edit1.Text:= OpenDialog1.FileName;
end;

Saludos

delphi.com.ar 19-08-2006 00:02:56

Yo le agregaría un mínimo detalle al código de Caral:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
    if OpenDialog1.Execute then
      Edit1.Text:= OpenDialog1.FileName;
end;

Por otro lado, algunas extenciones de la VCL como RxLibs incluyen componentes que son unas casillas de texto con un botón que te despliegan un diálogo de este tipo encapsulando lo que quieres hacer.

Saludos!

Caral 19-08-2006 00:09:57

Gracias por el comentario Federico y me parece propio ampliar la posivilidad de ejecucion al codigo (Buen Tino) ahunque mas fuerte para un aprendiz
Saludos

papu24ar 19-08-2006 00:51:31

muchas gracias a los 2 me funciono re bien :)


La franja horaria es GMT +2. Ahora son las 09:14:59.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi