Einzelnen Beitrag anzeigen

Benutzerbild von gmarts
gmarts

Registriert seit: 4. Apr 2004
Ort: Templin
290 Beiträge
 
Delphi 6 Enterprise
 
#7

Re: Eine txt Datei mit links soll mit ShellExecute alle link

  Alt 25. Apr 2005, 13:39
Na dann nimm das:
ShellExecute(Handle, PChar('open'), PChar('C:\Windows\Explorer.exe'), PChar(S.Items[i]), SW_SHOWNORMAL)); aus der Schleife raus und packs in einen Timer!

Speziallösung für dich: mach ein Sleep(60000); in die Schleife.
procedure TForm1.Button1Click(Sender: TObject);
begin
button1.Click;
end;