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

Вниз

MessageBox   Найти похожие ветки 

← →
Anar ©   (2002-10-28 21:42) [0]

Мастера, помогите.
Надо чтоб выводился MessageBox с заголовком и текстом соответсвенно из Edit1 и Edit2.

Такой код выводит ошибку:


MessageBox(Application.Handle,Edit1.Text,Edit2.text,MB_ICONSTOP);


А такой код: выводит сообщение с непонятными символами:


var MyTitle, MyText:String;
begin
MyTitle:=Edit1.Text;
MyText:=Edit2.Text;
MessageBox(Application.Handle,@MyTitle,@MyText,MB_ICONSTOP);
end;


В чём глюк?

---

← →
LongIsland ©   (2002-10-28 21:56) [1]

MessageBox(Application.Handle,PChar(Edit1.Text+Edit2.text),nil,MB_ICONSTOP);

---

← →
Anar ©   (2002-10-28 22:03) [2]

БОЛЬШОЕ СПАСИБО!

---

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

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

Наверх

Память: 0.46 MB
Время: 0.021 c