Einzelnen Beitrag anzeigen

faeX

Registriert seit: 29. Jan 2008
29 Beiträge
 
Delphi 5 Standard
 
#1

Problem beim Senden mit SendBuf (TFont, TColor)

  Alt 31. Mai 2008, 17:28
Delphi-Quellcode:

TBefehl = record
  TagFont : TFont;
  TagString : String;
  TagColor : TColor;
  TagInteger : Integer
end;
Delphi-Quellcode:
procedure senden;
var
  Befehl : TBefehl;
begin
  Befehl.TagFont := Form1.font;
  Befehl.TagString := '';
  Befehl.TagColor := clBlack;
  Befehl.TagInteger := 0;
  Form1.Client.Socket.SendBuf(Befehl,sizeOf(Befehl));
end;
Dann kommt eine Fehlermeldung.
Wie kann ich dieses Problem lösen?
Fabian
Da war auch noch der junge Mann der wollte Schriftsteller werden und tiefe emotionen in den Lesern wecken - sie zum weinen bringen. Heute ist dieser Traum in Erfüllung gegangen: Er schreibt die Fehlermeldungen von Windows.
  Mit Zitat antworten Zitat