Ввод текста в адрес

[xRamzeSx]

Всем доброго времени суток.
Есть процедура кнопки, которая отправляет в опр. адрес числовой текст из Edit'а.
При вводе букв англ. и русс. раскладки, появляется ошибка в программе:
"Любой текст" is not a valid integer value.
Как исправить данное?

procedure TForm1.Button1Click(Sender: TObject);
var
res:int64;
begin
res:=StrToint64(Edit1Text);
write_value($000000,4,res);
end;

[Sibedir]

А у вас что, в эдите хранится текст 'Любой текст'?

res := StrToint64 ('Любой текст');

Естественно тут ошибка будет.

[xRamzeSx]

Нет, там ничего по началу не хранится. Даже если пусто, появляется ошибка:
"" is not a valid integer value.

[MaxNik2009]

Даже если пусто, появляется ошибка:

логично '' это не число... введи в эдит число..
--
А лучше установи свойства Edit'a:
* NumbersOnly:= true;
* Text:= '0';

[xRamzeSx]

Мне нужно, чтобы был текст, а не число. При его вводе и появляется ошибка...

[MaxNik2009]

res:=StrToint64(Edit1Text);

А зачем ты тогда переводишь текст в число???

[xRamzeSx]

Эта функция мне нужна для другого адреса, по этому перевожу.
Теперь осталась такая же, но для простого буквенного текста

[MaxNik2009]

тогда может так:

procedure TForm1.Button1Click(Sender: TObject);
begin
write_value($000000,4,Edit1.Text);
end;

[xRamzeSx]

Delphi пишет ошибку

[MaxNik2009]

какую?
Приведи процедуру write_value.