Moinsen,
ich habe ein Problem mit dieser
OnWork Prozedur....... so sieht meine aus......
Delphi-Quellcode:
Procedure TfrmMain.ServerDatenWork(Sender: TObject; AWorkMode: TWorkMode;
Const AWorkCount: Integer);
Begin
frmMain.Server.Socket.Connections[0].SendText('310' + IntToStr(AWorkCount));
Application.ProcessMessages;
End;
Wie man sieht, gleicht sie dem Model was etwas weiter oben steht! Aber das Problem ist: Er geht dort NIE rein! Die
WorkStart und
WorkEnd Prozeduren macht er, der Datentransfer (darin geht es in meinem Prog.) klappt auch wunderbar! Aber er geht nicht in die
OnWork Prozedur rein.....
Wer weiss woran das liegen kann?!
PS: Das "310" ist nur der Erkennungscode, damit ich auf "der anderen Seite" anzeigen kann, wie weit der Transferstatus ist.....
Beste Grüsse,
Ricane