Текущий архив: 2010.02.21;
Скачать: CL | DM;
Вниз
Как присвоить длину поля EditBox переменной? Найти похожие ветки
← →
Стас (2008-05-27 18:17) [0]Пробую присвоить перемнной длину поля EditBox
procedure TForm1.Button1Click(Sender: PObj);
var len, res: integer; usedit: string;
begin
usedit:=EditBox1.Text;
len:=StrLen(usedit); // ошибка Incompatible types: "String" and "PChar"
form:=((len*2)*(len*2))*2;
EditBox2.Text:=Int2Str(form);
end;
Что я делаю не так?
← →
Стас (2008-05-27 18:21) [1]Пардон, вот так у мен...
Пробую присвоить перемнной длину поля EditBox
procedure TForm1.Button1Click(Sender: PObj);
var len, res: integer; usedit: string;
begin
usedit:=EditBox1.Text;
len:=StrLen(usedit); // ошибка Incompatible types: "String" and "PChar"
RES:=((len*2)*(len*2))*2;
EditBox2.Text:=Int2Str(RES);
end;
Что я делаю не так?
← →
Стас (2008-05-27 18:23) [2]Пардон, вот так у мен...
Пробую присвоить перемнной длину поля EditBoxprocedure TForm1.Button1Click(Sender: PObj);
var len, res: integer; usedit: string;
begin
usedit:=EditBox1.Text;
len:=StrLen(usedit); // ошибка Incompatible types: "String" and "PChar"
RES:=((len*2)*(len*2))*2;
EditBox2.Text:=Int2Str(RES);
end;
Что я делаю не так?
← →
Дмитрий К © (2008-05-27 19:05) [3]Length(usedit)
Страницы: 1 вся ветка
Текущий архив: 2010.02.21;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.015 c
