Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.10.24;
Скачать: CL | DM;

Вниз

Как в WinApi из Edit записать в переменную integer?   Найти похожие ветки 

 
ArhDD   (2004-09-19 15:26) [0]

Как в WinApi из Edit записать в переменную integer?
GetWindowText(lParam,i,n) просит тип Pchar.


 
Anatoly Podgoretsky ©   (2004-09-19 16:09) [1]

Правильно просит, так как это не целочисленное, а строка с нулевым завершающим байтом.


 
ArhDD   (2004-09-19 16:28) [2]

А можно обойти это?
Btn[4]:=CreateWindowEx(0,"Edit","Х",ES_AUTOHSCROLL or WS_CHILD or WS_VISIBLE,70,80,75,18,wndObj,0,hInstance,nil);
Х из едита записать в XI
SetWindowPos(Btn,HWND_TOPMOST,XI,50,20,0,SWP_NOSIZE);


 
ArhDD   (2004-09-19 19:07) [3]

функция Inttostr в API не пашет :(


 
ArhDD   (2004-09-19 19:12) [4]

Все, это модуль SYS подключен не был.


 
ipnet ©   (2004-09-20 06:20) [5]

использование sysutils увеличивает объем exe, если хочешь получить минимальный объем, не используй его, отключи. А inttostr замени например так:
//Author      : Jan Horn

{------------------------------------------------------------------}
{  Function to convert int to string.                              }
{------------------------------------------------------------------}
function IntToStr(Num : Integer) : String;  // using SysUtils increase file size by 100K
begin
 Str(Num, result);
end;


 
Коля   (2004-09-21 12:11) [6]

Есть такая процедура в System.pas(вписывать в Uses не надо) под названием
 Val(Исходный:Текстовая переменная,
   var Выход:Числовая переменная,
   var Ошибка:Integer);
при ошибке выдаёт в переменную "Ошибка" не 0.



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

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

Наверх




Память: 0.48 MB
Время: 0.036 c
6-1091797258
Дмитрий Ботвин
2004-08-06 17:00
2004.10.24
Создание общего ресурса


1-1097091748
bloodman
2004-10-06 23:42
2004.10.24
Как найти TtreeNode по AbsoluteIndex в дереве??


6-1092291016
RomanAD
2004-08-12 10:10
2004.10.24
Подключение к Active Directory


1-1097505960
gigabyte
2004-10-11 18:46
2004.10.24
Как работать с Microsoft Agent?


1-1097240170
Chlavik
2004-10-08 16:56
2004.10.24
Как проверить В Delphi Olevarint на "Nothing" ?