»» Перемещено в конференцию "Начинающим"

> sysutils

А это зачем?

> Dmitry S ©   (20.04.08 20:53) [2]
> > sysutilsА это зачем?

для того чтоб inttostr работал...для калькулятора, в едите же тип стринг...

А в чем тогда прикол писать на WinApi?

> Dmitry S ©   (20.04.08 21:01) [4]
> А в чем тогда прикол писать на WinApi?

А как по другому сделать перевод из стрингов в интеджер и тд?
А прикол - знание сила ... может пригодится в будущем...

P.S. есть примеры программ на WinApi?

есть процедура val ;)
Примеры есть...

Dmitry S можешь поделиться?

> для того чтоб inttostr работал...

> [6] Dmitry S ©   (20.04.08 21:10)
> есть процедура val ;)

Она в другую сторону работает ;)
Впрочем это не аргумент в пользу SysUtils... :)

> {RASkov} ©   (20.04.08 21:20) [8]

Я про это:

> А как по другому сделать перевод из стрингов в интеджер
> и тд?



> yahoo ©   (20.04.08 21:18) [7]

минут через 10 выложу... Открыточка моя=)

никто не знает почему
GetWindowText(GetDlgItem (hWindow, id_edit),s,50); выдает не то что внесено в едит?
если

> {RASkov} ©   (20.04.08 21:33) [10]
> function InStr(I: Integer): string;begin  Str(I, Result);
> end;function InInt(S: string): Integer;var Code: Integer;
> begin  Val(S, Result, Code);  if Code<>0 then begin   Result:
> =0;  end;end;

спасибо )

> никто не знает почему
> GetWindowText(GetDlgItem (hWindow, id_edit),s,50); выдает
> не то что внесено в едит?

Пушкин знает, который память выделял под S.

Лови=)
http://argi.ru/heart3.rar

> DVM ©   (20.04.08 21:46) [13]
> > никто не знает почему > GetWindowText(GetDlgItem (hWindow,
>  id_edit),s,50); выдает > не то что внесено в едит?Пушкин
> знает, который память выделял под S.

полный код в первом посте...  
уже сам нашел в чем баг, надо просто объявить не в функции а выше...

ch: Thandle;
s: PChar;
sl: Integer;

ch := GetDlgItem (hWindow, id_edit);
sl := GetWindowTextLength(ch);
getMem(s, sl+1);
ZeroMemory(s, sl+1);
GetWindowText(ch,s,50);

...

freeMem(s)

> yahoo ©   (20.04.08 21:54) [15]


> полный код в первом посте...  

в полном коде я тоже не вижу ни выделения памяти под S ни даже определения того сколько ее (памяти) надо выделять.

!  ...\heart3.rar: Ошибка CRC в Heart3.exe, файл повреждён
!   ...\heart3.rar: Неожиданный конец архива

*.res нету ) и ехе не обезательно в архив

> уже сам нашел в чем баг, надо просто объявить не в функции
> а выше...

баг ты не нашел, ты его переместил.