SetWindowText - не отправляется в Edit

← →
VZup © (2004-10-25 11:12) [0]

Не могу отправить SetWindowText(Edit1, Text), хотя отправляестся в заголовок главного окна, подскажите что делать?

← →
DVM © (2004-10-25 11:17) [1]

> подскажите что делать?

WM_SETTEXT()

← →
VZup © (2004-10-25 11:46) [2]

пробовал, аналогично

← →
Anatoly Podgoretsky © (2004-10-25 11:54) [3]

Что такое Edit1 и Text

← →
4e6ypaTop _@(o,o)@_ © (2004-10-25 12:27) [4]

>Anatoly Podgoretsky © (25.10.04 11:54) [3]

Edit1 - это хендл окна
Text - это присваиваемый текст
а SetWindowText - это процедура которая сама понимает что от нее хотят.

← →
4e6ypaTop _@(o,o)@_ © (2004-10-25 12:33) [5]

>VZup © (25.10.04 11:12)

Делай так :
SetWindowText(edit1.Handle,pchar("New Text"));
У тебя хендл не стоял
SetWindowText(edit1,pchar("New Text"))
и (судя по всему) значению Text присвоено ничего небыло.

← →
VZup © (2004-10-25 14:19) [6]

У меня, по определению Edit1: HWND, а
Text: PChar, причем:
Так получается:
SetWindowText(Wnd, Text) - меняется Title окна
А так не получается:
SetWindowText(Edit1, Text) - должен менять текст Edit"a, как написано в справке

← →
clickmaker © (2004-10-25 14:38) [7]

> VZup © (25.10.04 11:12)

Приложение, где живет этот эдит, твое?

← →
VZup © (2004-10-25 15:40) [8]

в смысле?

← →
clickmaker © (2004-10-25 16:12) [9]

> [8] VZup © (25.10.04 15:40)
> в смысле?

В прямом. В пределах одного приложения текст устанавливается?

← →
4e6ypaTop _@(o,o)@_ © (2004-10-25 17:10) [10]

Ты в своей программе текст в эдит вставляешь?
SetWindowText(edit1.Handle,pchar("New Text"));

вот как сказал, все работает - специально проверял... (ну, это если в своей программе)

← →
Unknown Mystic © (2004-10-25 17:59) [11]

>> VZup © (25.10.04 14:19) [6]
>> У меня, по определению Edit1: HWND

Т.е. я так понимаю, что Edit1 - просто переменная. А чей хендл(и как) ты присваеваешь переменной Edit1?

← →
VZup © (2004-10-25 19:46) [12]

Edit1:=CreateWindowEx(WS_EX_CLIENTEDGE, "Edit", nil, WS_BORDER or WS_VISIBLE or WS_CHILD, 10, 10, 300, 24, Wnd, 2, hInstance, nil);

← →
clickmaker © (2004-10-25 19:56) [13]

> [12] VZup © (25.10.04 19:46)

if not SetWindowText(Edit1, "Text") then
ShowMessage(SysErrorMessage(GetLastError));

что говорит?

Говорит: "Недопустимый дескриптор окна"

Весь код давай.

← →
Kind (2004-10-25 22:41) [17]

У меня твой код [12] работает.

Edit1:=CreateWindowEx(WS_EX_CLIENTEDGE, "Edit",
nil, WS_BORDER or WS_VISIBLE or WS_CHILD,
10, 10, 300, 24, MAINWINDOW, 2, hInstance, nil);
SetWindowText(Edit1,"TEST");

Всё меняется.
У тебя вообще EDIT на окне отображается? :)

> Kind
У меня так тоже отображается, но мне надо, чтобы он отображался на нажатие кнопки, т.е.:
WM_CREATE: begin Edit1:=CreateWindowEx(WS_EX_CLIENTEDGE, "Edit", nil, WS_BORDER or WS_VISIBLE or WS_CHILD, 10, 10, 300, 24, Wnd, 2, hInstance, nil); end; WM_COMMAND: begin case LoWord(wParam) of 1: SetWindowText(Edit1, "Text"); - Действие на кнопку end; end;

Вот если написать SetWindowText(Wnd, Text), то работает...

Всем огромное спасибо, сам разобрался

SetWindowText - не отправляется в Edit Найти похожие ветки