Теперь он ругается на другое, посотрите на код где подчеркнуто на то и ругается:
Цитата:
type
TForm1 = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
...
Edit1.Text:=IntToHex(1234567890123456789, 16);
Edit2.Text:=IntToStr(StrToInt64('$'+EditHex.Text));
|
Заранее всем спасибо за помощь.