Ver Mensaje Individual
  #4  
Antiguo 07-08-2003
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Reputación: 27
delphi.com.ar Va por buen camino
¿Qué te parece algo así?

Código:
procedure TForm1.Button1Click(Sender: TObject);
begin
  if (ShellListView1.SelectedFolder <> nil) and
     (not ShellListView1.SelectedFolder.IsFolder) Then
  begin
    Memo1.Lines.LoadFromFile(ShellListView1.SelectedFolder.PathName);
  end;
end;
Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita