Загрузка курсора из RES файла - Общие вопросы Delphi

Lastenemy · 20.08.2009, 03:19

Доброго времени суток! Возникла такая вот проблема. Ни в какую не хочет загружать мой курсор из ресурса, ошибки не выдаёт, но не меняет. Со стандартными (crDefault crSizeall итд) работает нормально. Может в 2007 делфи че-то поменялось а я не в курсе?

Код:

private
  const CURS=15;

implementation

{$R *.dfm}
{$R Myres.res}

procedure TForm1.FormCreate(Sender: TObject);
begin
Screen.Cursors[CURS]:=LoadCursor(Hinstance,'MCURS');
Button1.Cursor :=CURS;
end;

uberchel · 20.08.2009, 03:50

Если по умолчанию курсор надо то:

Код:

private
  const CURS=1;

во стольном все в порядке, скиньте res файл с курсорам, может там что не так!

Lastenemy · 21.08.2009, 03:18

Может дело в типе данных? В rc файле использую для курсора тип RCDATA

добавлено через 2 минуты
Причина была в типе данных. Тема закрыта

20.08.2009, 03:19	#1
Lastenemy Новичок Джуниор Регистрация: 07.08.2009 Сообщений: 2	Загрузка курсора из RES файла Доброго времени суток! Возникла такая вот проблема. Ни в какую не хочет загружать мой курсор из ресурса, ошибки не выдаёт, но не меняет. Со стандартными (crDefault crSizeall итд) работает нормально. Может в 2007 делфи че-то поменялось а я не в курсе? Код: `private const CURS=15; implementation {$R *.dfm} {$R Myres.res} procedure TForm1.FormCreate(Sender: TObject); begin Screen.Cursors[CURS]:=LoadCursor(Hinstance,'MCURS'); Button1.Cursor :=CURS; end;`

20.08.2009, 03:50	#2
uberchel Участник клуба Регистрация: 19.01.2009 Сообщений: 1,484	Если по умолчанию курсор надо то: Код: `private const CURS=1;` во стольном все в порядке, скиньте res файл с курсорам, может там что не так!

21.08.2009, 03:18	#3
Lastenemy Новичок Джуниор Регистрация: 07.08.2009 Сообщений: 2	Может дело в типе данных? В rc файле использую для курсора тип RCDATA добавлено через 2 минуты Причина была в типе данных. Тема закрыта Последний раз редактировалось Lastenemy; 21.08.2009 в 03:24.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Проблема такова: язык:Delphi7; сохранения файла; загрузка файла в String Grid	lightdevil	Общие вопросы Delphi	3	06.03.2009 23:10
Загрузка из файла.	(_)	Общие вопросы C/C++	2	28.02.2009 22:16
Загрузка курсора из фаила .cur и/или .res	Ciberal	Общие вопросы Delphi	2	29.10.2008 19:25
Загрузка Файла	Volkogriz	Общие вопросы Delphi	3	31.10.2007 21:14
Загрузка файла	AVer	Работа с сетью в Delphi	0	11.02.2007 17:22