DynamicSkinForm - загрузка списка скинов в list Box при запуске программы - Компоненты Delphi

dani92 · 19.08.2009, 17:27

Возникла проблема, как загрузить список скинов в dynamicSkinForm, при запуске программы, при этом использую внутренние скины или использую путь к папке??

dani92 · 20.08.2009, 17:28

Кто знает, помогите срочно

uberchel · 20.08.2009, 18:05

Поставь в OnCreate !

Код:

var
 SR: TSearchRec;

...


if FindFirst('C:\Skins\*.skn', faAnyFile, SR)  = 0 then
  Repeat
  ListBox1.Add(SR.Name);
  Until 
  FindNext(SR) <> 0 ;
  FindClose(SR);

Расширение точно не помню или skn или asz !

dani92 · 20.08.2009, 19:22

Спасибо, asz в AlphaSkin))

19.08.2009, 17:27	#1
dani92 Форумчанин Регистрация: 17.02.2009 Сообщений: 132	DynamicSkinForm - загрузка списка скинов в list Box при запуске программы Возникла проблема, как загрузить список скинов в dynamicSkinForm, при запуске программы, при этом использую внутренние скины или использую путь к папке?? Чат по локальной сети http://fmchat.ucoz.kz - протестируйте плиз))) а так delphi эта лучшая система программирования

20.08.2009, 17:28	#2
dani92 Форумчанин Регистрация: 17.02.2009 Сообщений: 132	Кто знает, помогите срочно Чат по локальной сети http://fmchat.ucoz.kz - протестируйте плиз))) а так delphi эта лучшая система программирования

20.08.2009, 18:05	#3
uberchel Участник клуба Регистрация: 19.01.2009 Сообщений: 1,453	Поставь в OnCreate ! Код: `var SR: TSearchRec; ... if FindFirst('C:\Skins\.skn', faAnyFile, SR) = 0 then Repeat ListBox1.Add(SR.Name); Until FindNext(SR) <> 0 ; FindClose(SR);` Расширение точно не помню или skn или asz ! Последний раз редактировалось uberchel; 20.08.2009 в 18:09.*

20.08.2009, 19:22	#4
dani92 Форумчанин Регистрация: 17.02.2009 Сообщений: 132	Спасибо, asz в AlphaSkin)) Чат по локальной сети http://fmchat.ucoz.kz - протестируйте плиз))) а так delphi эта лучшая система программирования

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Помощь с List Box Delphi	Antyan-screammer	Помощь студентам	7	16.06.2010 00:00
Эффекты при запуске программы	Vladya	Общие вопросы Delphi	10	17.03.2009 17:29
Ошибка при запуске программы	MAcK	Общие вопросы .NET	5	14.08.2008 15:12
При запуске ComboBoxEx пишет List index out of bounds -1.	dx+	Общие вопросы Delphi	6	12.06.2008 22:32
E-Mail форма+List Box	Nemesisking	PHP	8	05.04.2008 12:59