2Er Komplement nach Signed Char umwandeln

[DeddyH]

Dann machst Du vielleicht etwas falsch. Ein kleiner Test bei mir (nur ein Button und ein Label auf der Form):

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Label1.Caption := IntToStr(ShortInt(Random(256)));
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Randomize;
end;

Klappt wunderbar.