Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Общие вопросы > Файлы в Проекте


Автор: Budy 9.4.2004, 17:09
:Всех приветствую!
Вот есть у меня RES-файл и имеется в нем Cur1.cur - курсор. А вот как его вытащить оттуда да вместо моего Form.Cursor поставить?

Автор: x77 9.4.2004, 18:41
Код

const
 crMyCursor = 5;

procedure TForm1.FormCreate(Sender: TObject);
begin
 Screen.Cursors[crMyCursor] := LoadCursor(HInstance, 'Cur1.cur');
 Cursor := crMyCursor;
end;

Автор: Budy 9.4.2004, 18:44
Thanks

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)