Also tatsächlich nonblocking Sockets?
Eine Sache, die mir grade noch auffällt, ist das Speichern/Laden des Bitmaps. Gibt es einen Grund, warum du nicht z.b.
TMemoryStream
verwendest? Dann reduziert sich dein kompletter Code mit den
ScanLine
s nämlich auf ein
Delphi-Quellcode:
I := 1234;
Stream.Write(I);
Bitmap.SaveToStream(Stream)
analog dazu das Laden:
Delphi-Quellcode:
Stream.Read(I);
if (I = 1234) then
Bitmap.LoadFromStream(Stream)