Главная страница
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.009 c
15-1260343163
TRSteep
2009-12-09 10:19
2010.02.21
Обратное проектирование баз


2-1261380806
JohnKorsh
2009-12-21 10:33
2010.02.21
Вопрос по компоненту UDPServer (INDY).


2-1261473957
pg81
2009-12-22 12:25
2010.02.21
Как передать какртинку и получить картику(не ресурс) из dll?


2-1261136409
Who_is_you?
2009-12-18 14:40
2010.02.21
Выход по времени ожидания


3-1234272238
bafy
2009-02-10 16:23
2010.02.21
Как добавить "значение по умолчанию" в запрос?