Forum: Netzwerke
Delphi
by starY,
6. Mai 2005
bei IdFTP1WorkBegin
(sender as TIdTCPConnection).Tag:=ThreadNR;
und dann bei IdFTP1Work
sender as TIdTCPConnection).Tag auslesen.
Aber danke für die Hilfe ohne die Posts wäre ich nicht auf die Lösung gekommen. Ist sozusagen ein Mix aus allem ^^
Forum: Netzwerke
Delphi
by starY,
6. Mai 2005
TidSimpleServer ist Sender.classname. Das Problem liegt halt darin, dass ich nicht weiß von welchem idFTP das Event ausgelöst wird und für jeden idFTP jweils eine feste Procedure anzulegen, sprengt wohl erstens den Code und zweitens die Flexibilität. :(
Forum: Netzwerke
Delphi
by starY,
6. Mai 2005
(Sender as TIdFtp).{...}
Löst ungültige Umwandlung aus leider :(
Forum: Netzwerke
Delphi
by starY,
6. Mai 2005
var idFTP: array of TidFTP;
idftp.OnWork:=IdFTP1Work;
procedure TForm1.IdFTP1Work(Sender: TObject; AWorkMode: TWorkMode;
const AWorkCount: Integer);
Mein Problem ist wie ich dann herausfinde welcher idFTP das IdFTP1Work ausgelöst hat. TidFTP(sender) will irgendwie nicht klappen.