Indy Umstellung Delphi 2006 auf Delphi 2010

[himitsu]

hmm, versuch es mal so:

Delphi-Quellcode:

var s: RawByteString;
begin
  s := #$0000 + #$0000 + #$0000 + #$00F6;
  IdUDPServer1.Broadcast( s, 30718 );
end;

var s: RawByteString;
begin
  SetLength(s, 4);
  s[1] := #$0000;
  s[2] := #$0000;
  s[3] := #$0000;
  s[4] := #$00F6;
  IdUDPServer1.Broadcast( s, 30718 );
end;

Aber da Broadcast nur String und TIdBytes anbietet, würde ich dir eher empfehlen es über TIdBytes zu lösen:

Delphi-Quellcode:

var s: TIdBytes;
begin
  SetLength(s, 4);
  s[0] := $00;
  s[1] := $00;
  s[2] := $00;
  s[3] := $F6;
  IdUDPServer1.Broadcast( s, 30718 );
end;