Autor Beitrag
TomTailor
Hält's aus hier
Beiträge: 3



BeitragVerfasst: Fr 23.05.03 13:26 
Hi,

Also ich habe ein Prog, das mir auf ein Laufwerk bestimmte
Dateien sucht. Alle gefunden Dateien zeigt er mir auch in
einer Listbox an. Alles schön und gut. Aber wie kann ich die Datei
durch ein Doppelklick Ereigniss (DBLClick) mit dem jeweiligen
Standart Programm starten ?

D.h. Wenn ich den Eintrag 6 (z.B txt datei) doppelt anklicke, soll
er mir die mit dem Editor öffnen. Oder wenn ich Eintrag 3 anklicke z.B
eine mp3 datei, dann soll er mir diese mit winamp (Standart Prog)
öffnen.

Mit ShellExecute ?? Aber wie mach ich das dann mir der Listbox ?? :(

Vielen Dank schon mal !!
Pascal
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 155

Win 98, Win XP
Delphi 2005, Delphi 5
BeitragVerfasst: Fr 23.05.03 13:30 
auf welches Item geklickt wurde kannst du mit der Eigenschaft (listbox1.)itemindex herausfinden (Integer Wert);
und das programm einfach mit
shellexecute(0,nil,pchar(lstbox1.items[listbox1.itemindex]),nil,nil,sw_normal);
starten.
(ungeprüft, aber müsste gehen)
TomTailor Threadstarter
Hält's aus hier
Beiträge: 3



BeitragVerfasst: Fr 23.05.03 13:55 
Vielen Dank !! Hätt ich auch selber drauf kommen können !! :roll:
Sorry !

Naja aber wie kann ich denn mehrere öffnen ? Er nimmt doch nur
den Track mit den Fokus. Angenommen ich habe 10 lieder. Und möchte nur den 3 und 6 Track abspielen lassen ?

MulitSelect und ExtendedSelect sind beide auf true !

Haste da ne Ahnung ?

Gruß TT
Pascal
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 155

Win 98, Win XP
Delphi 2005, Delphi 5
BeitragVerfasst: Fr 23.05.03 16:12 
Titel: listbox1.selected[index]:boolean
Ich habe mal in der Hilfe nachgeschaut.
Es gibt eine Eigenschaft namens selected. Wenn man also wissen will welche Einträge Selectiert sind, dann kann man das per
ausblenden Quelltext
1:
2:
3:
for t:=0 to listbox1.items.count-1 do begin
if listbox1.Selected[t] then label1.caption:=label1.caption+','+inttostr(t);
end;

prüfen. In diesem Fall werden sie im Label aufgelistet.
Extendedselect würde ich auf false setzen, damit man überhaupt 2 verschiedene auswählen kann.
Wie man allerdings herausfindet wann der Mp3-Player fertig ist, weiß ich nicht. Ich könnte also höchstens beide gleichzeitig öffnen.