Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.13;
Скачать: CL | DM;

Вниз

Как перевести pchar в string?   Найти похожие ветки 

 
maxXP ©   (2003-10-24 22:53) [0]

var
hwndHandle : THANDLE;
hMenuHandle : HMENU;
Как перевести string в pchar ?
===============================
sss:pchar;
begin

sss:="Безымянный - Блокнот";
{a если из TEdit} sss:=edit1.text \\Ошибка ?????????????/
hwndHandle := FindWindow(nil, sss);
if (hwndHandle <> 0) then begin
hMenuHandle := GetSystemMenu(hwndHandle, FALSE);
if (hMenuHandle <> 0) then
DeleteMenu(hMenuHandle, SC_CLOSE, MF_BYCOMMAND);
end;


 
Guerrillero ©   (2003-10-24 23:00) [1]

Вниз взглянуть лень ?
http://delphimaster.net/view/1-1067015879/


 
maxXP ©   (2003-10-24 23:13) [2]

Спасибо! :)



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

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

Наверх




Память: 0.46 MB
Время: 0.028 c
1-41288
Bless
2003-10-29 09:51
2003.11.13
Как узнать, сколько памяти занимает класс?


1-41467
Sagrer
2003-11-04 19:37
2003.11.13
Помогите с Selection в Memo.


1-41708
slivka
2003-11-02 14:10
2003.11.13
Как добавить параметр типа REG_MULTI_SZ в реестр ?


1-41249
Andrey Klimov
2003-10-31 18:28
2003.11.13
Autodetect Charset


14-42106
Ihor Osov'yak
2003-10-23 15:53
2003.11.13
Как вам такова версия о причине событий вокруг Тузлы?