Forum: Programmieren allgemein
by schwa226,
8. Sep 2011
Nicht ganz...
Ich rufe ja die Put(File :String,...) Prozedur auf, diese ruft die Put(Stream,...) auf und diese wieder die CheckOptionAck. Die orignalen Put von TIdTrivialFTP ruft mir natürlich auch die TIdTrivialFTP.CheckOptionAck auf und nicht meine.
Ich habe nun die Put Prozeduren auch mit Overload in meine TMyIdTrivialFTP übernommen und nun wird meine CheckOptionAck Version aufgerufen.
...
Forum: Programmieren allgemein
by schwa226,
8. Sep 2011
type
TIdTrivialFTP = class(TIdUDPClient)
protected
FMode: TIdTFTPMode;
FRequestedBlockSize: Integer;
FPeerPort: TIdPort;
FPeerIP: String;
function ModeToStr: string;
procedure CheckOptionAck(const OptionPacket: TIdBytes; Reading: Boolean);
protected