Einzelnen Beitrag anzeigen

Benutzerbild von STS301
STS301

Registriert seit: 6. Nov 2007
668 Beiträge
 
Delphi 7 Personal
 
#4

Re: Problem mit TCP Server.Execute

  Alt 7. Mär 2008, 19:42
\\edit: habe es jetzt auch versucht mit einem Thread
Delphi-Quellcode:
if MessageDlg('Ihnen wird die Datei ' + file2 + ' von '+ name2 + ' geschickt! Wollen Sie diese annehmen?'
,mtConfirmation, mbokcancel, 0) = mrYes then save;

//so soeht die Procedure aus
procedure save;
begin
 savedialoge.execute(file2); //nur leider findet er in der Procedure den SaveDialoge nicht
end;
hat jemand eine bessere Lösung??
Sebastian

ölpölp

Linux will rule the universe!!
  Mit Zitat antworten Zitat