Ich möchte ein JPG-Bild über WinSocket schicken.
Ich habe folgenden Code:

Typen-Deklaration:

Code :

1 2 3 4 5

type   TYaimRec = record     Text: String[200];     Img: TGraphic; end;

Versenden beim Client:

Code :

1 2 3 4

Rec.Text:='IMG';   image1.Picture.Graphic.LoadFromFile('C:\test.jpg');   Rec.Img:=image1.Picture.Graphic;   Client.Socket.SendBuf(Rec,sizeof(Rec));

Empfangen beim Server:

Code :

1 2 3 4 5

Socket.ReceiveBuf(Rec,SizeOf(Rec));   if rec.Text='IMG' then begin     rec.img.SaveToFile('C:\test_received.jpg');   end   else showmessage(Rec.Text);

Wieso funktionniert das nicht?
Beim speichern am Server
Code: markieren

Code :

1	rec.img.SaveToFile('C:\test_received.jpg');

bekomm' ich eine Access violation.

mfG;

Die Accessviolation kommt daher, dass du kein legales TGraphic-Objekt angelegt hast. Statt dessen greifst du einfach auf eine Variable zu, in der keine gültige Referenz drin steht. Denk dran, die Instanz einer TGraphic-Klasse ist kein einfacher Record. Du musst die Bilddaten schon selbst übertragen. Das bloße Übertragen der Objektreferenz in rec.img hilft da nicht.

-Gawayn