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

Вниз

Текст из Edit   Найти похожие ветки 

← →
Ilg   (2003-09-11 19:11) [0]

Здравствуйте!
Вопрос такой:
Я создаю форму на API (с помощью Resource Workshop), содержащую Edit:
CONTROL "", 102L, "EDIT", ES_LEFT | ES_PASSWORD | WS_CHILD | WS_VISIBLE | WS_BORDER | WS_GROUP | WS_TABSTOP, 6, 20, 128, 13
Скажите, как мне получить строку, введенную в него?
Заранее, Большое спасибо!

---

← →
oleg_art ©   (2003-09-11 19:40) [1]

WM_GETTEXT

---

← →
Igit ©   (2003-09-11 23:02) [2]

Вот держи, сам искал...
Function GetDlgText(hDlg: HWND; nIDDlgItem: Integer) : string;
var
p : PChar;
length : integer;
begin
length := SendDlgItemMessage(hDlg, nIDDlgItem, wm_gettextlength, 0, 0);
if length <> 0 then begin
GetMem(p, length+1);
SendDlgItemMessage(hDlg, nIDDlgItem, wm_gettext, length+1, Integer(p));
Result:=p;
FreeMem(p, length+1);
end;
end;

---

← →
Ilg   (2003-09-12 11:58) [3]

Igit, Большое спасибо!

---

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

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

Наверх

Память: 0.47 MB
Время: 0.067 c