Komponent Filelistbox

Odpowiedz Nowy wątek
2006-08-18 07:19
0

Poniewaz dostalem odpowiedz odnosnie komponentu memo (przeniesienie do kosza - niestety tak sie n ie da ale juz sobie to obeszlem i poradzilem) prosze o pomoc w jeszcze jednym temacie:

Chcialbym zrobic zeby po dwukliku na komponencie Filelistbox (wybraniu pliku) mozna go bylo np. uruchomic(dla *.exe) lub podejrzec (dla plikow rar/zip) itd. Jak to sie realizuje?

Pozostało 580 znaków

2006-08-18 08:50
0
uses ShellApi;
procedure TForm1.FileListBox1DblClick(Sender: TObject);
var Plik : PChar;
begin
 Plik := PChar(FileListBox1.Items[FileListBox1.ItemIndex]);
 ShellExecute(Handle, 'open', Plik, NIL, NIL, SW_NORMAL);
end;

Pozostało 580 znaków

2006-08-18 10:09
0

dziękuje za odpowiedz
Pozdrawiam

Pozostało 580 znaków

Odpowiedz
Liczba odpowiedzi na stronę

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0