ну дык..
во всем виноваты стереотипы, лень тут не при чем:)
Найдено 7 результатов
- 27.11.2009 13:04:29
- Форум: Общее
- Тема: Как скомпилировать прогу в Virtual Pascal 2.1 build 279?
- Ответы: 7
- Просмотры: 17976
- 27.11.2009 11:56:52
- Форум: Общее
- Тема: Как скомпилировать прогу в Virtual Pascal 2.1 build 279?
- Ответы: 7
- Просмотры: 17976
Re: Как скомпилировать прогу в Virtual Pascal 2.1 build 279?
Спасибо, включил поиск - нашел! Кто бы мог подумать...
- 27.11.2009 01:37:48
- Форум: Общее
- Тема: Как скомпилировать прогу в Virtual Pascal 2.1 build 279?
- Ответы: 7
- Просмотры: 17976
Re: Как скомпилировать прогу в Virtual Pascal 2.1 build 279?
Ну а куда еще писать? Решил, что тут полно фанатов-паскальщиков.
- 27.11.2009 00:22:16
- Форум: Общее
- Тема: Как скомпилировать прогу в Virtual Pascal 2.1 build 279?
- Ответы: 7
- Просмотры: 17976
Как скомпилировать прогу в Virtual Pascal 2.1 build 279?
Такое чувство, что у меня интерпретатор, файл .exe не появляется! Кто-нибудь работал в Virtual Pascal?
- 08.11.2009 16:31:00
- Форум: Free Pascal Compiler
- Тема: WM_SETTEXT
- Ответы: 4
- Просмотры: 4783
Re: WM_SETTEXT
Edit1 или Edits[j] не суть важно.
array[0..9] of HWND
Добавлено спустя 13 минут 52 секунды:
Будет работать и так: Integer(@s), блин, ошибка была в другом.
Рабочий код:
for i:= 0 to 9 do
begin
s := 'qwe' ;
SendMessage(Edits[i], WM_SETTEXT, Length(s), Integer(@s[ 1 ]))
end;
Спасибо.
array[0..9] of HWND
Добавлено спустя 13 минут 52 секунды:
Будет работать и так: Integer(@s), блин, ошибка была в другом.
Рабочий код:
for i:= 0 to 9 do
begin
s := 'qwe' ;
SendMessage(Edits[i], WM_SETTEXT, Length(s), Integer(@s[ 1 ]))
end;
Спасибо.
- 08.11.2009 15:10:46
- Форум: Free Pascal Compiler
- Тема: WM_SETTEXT
- Ответы: 4
- Просмотры: 4783
Re: WM_SETTEXT
n := Integer(@s[ 1 ]); // ссылка на строку
И как ее использовать?
Добавлено спустя 8 минут 2 секунды:
SendMessage(Edit1, WM_SETTEXT, Length(s), lParam(PChar(s))) // не работает
Добавлено спустя 7 минут 59 секунд:
SendMessage(Edits[i], WM_SETTEXT, Length(s), Integer(@s)) // компилируется ...
И как ее использовать?
Добавлено спустя 8 минут 2 секунды:
SendMessage(Edit1, WM_SETTEXT, Length(s), lParam(PChar(s))) // не работает
Добавлено спустя 7 минут 59 секунд:
SendMessage(Edits[i], WM_SETTEXT, Length(s), Integer(@s)) // компилируется ...
- 08.11.2009 14:30:45
- Форум: Free Pascal Compiler
- Тема: WM_SETTEXT
- Ответы: 4
- Просмотры: 4783
WM_SETTEXT
В Delphi 7 все просто:
s := 'asd' ;
SendMessage(Edit1, WM_SETTEXT, Length(s), lParam(s));
или так:
s := 'asd' ;
SendMessage(Edit1, WM_SETTEXT, 3, Integer(s));
Как сделать то же самое в FP? Пишет "Illegal type conversion":
SendMessage(Edit1, WM_SETTEXT, Length(s),
lParam(s)); // Error
s := 'asd' ;
SendMessage(Edit1, WM_SETTEXT, Length(s), lParam(s));
или так:
s := 'asd' ;
SendMessage(Edit1, WM_SETTEXT, 3, Integer(s));
Как сделать то же самое в FP? Пишет "Illegal type conversion":
SendMessage(Edit1, WM_SETTEXT, Length(s),
lParam(s)); // Error
