Keine ahnung ob das etwas mit deinem Problem zu tun hat, aber sollte das
Delphi-Quellcode:
with AContext.Connection.IOHandler do
LLine := ReadLn;
LCmd := Fetch(LLine);
Operation := strtoint(LCmd[1]);
nicht eigentlich so aussehen:
Delphi-Quellcode:
with AContext.Connection.IOHandler do
begin
LLine := ReadLn;
LCmd := Fetch(LLine);
Operation := strtoint(LCmd[1]);
end;
Ich kann dir nur raten deinen Quelltext mal etwas besser zu formatieren und zu kommentieren, denn dadurch sieht man auch schon mal den einen oder anderen Fehler. Kommentare im Quelltext würde es für andere einfacher machen die Funktionen zuordnen zu können. Du weißt vielleicht was Button1, 2 und 3 machen sollen, aber ein anderer rätselt unter Umständen erstmal.