Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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]

Пардон, вот так у мен...

Пробую присвоить перемнной длину поля 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 19:05) [3]

Length(usedit)



Страницы: 1 вся ветка

Текущий архив: 2010.02.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.008 c
11-1174919254
ElectriC
2007-03-26 18:27
2010.02.21
Горизонтальная полоса прокрутки в ListBox


6-1212331478
Антон
2008-06-01 18:44
2010.02.21
перехват http


2-1261143805
TStas
2009-12-18 16:43
2010.02.21
Ошибка создания MDI формы


8-1203148371
nuflin
2008-02-16 10:52
2010.02.21
чем шейдеры 3 отличаются от шейдеров 1(2) ????


15-1260369295
xayam
2009-12-09 17:34
2010.02.21
Вопрос по SQL