| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

PostMessage [D5, Win95/98]

Страницы:   < 1 2 >

YUS ©   (2001-12-10 19:08:00) 

Как с помощью функции PostMessage или SendMessage передать переменную String, (lParm и wParam) ведь integer. И как затем получить String переменную из (lParm и wParam) ? Спасибо.

---

Delirium   (2001-12-10 19:27:00) [21]


const MyMessage=WM_USER+2000;
...
procedure OnMyMessage(var Msg:TMessage); message MyMessage;
...
procedure TForm1.Button4Click(Sender: TObject);
var S:String;
begin
S:="Привет";
SendMessage(Handle,MyMessage,0,Integer(PChar(S)));
end;

procedure TForm1.OnMyMessage(var Msg:TMessage);
var S:String;
begin
S:=String(Msg.LParam);
ShowMessage(S);
end;


---

YUS   (2001-12-10 19:19:00) [22]

А можно пример, как передать указатель на string.

---

Mick   (2001-12-10 19:10:00) [23]

Передай указатель на String, и все дела

---

Страницы:   < 1 2 >

Наверх