Вниз
Скачать: CL | DM;

Трабл со скинами   Найти похожие ветки 

 
qwerg ©   (2004-07-02 12:50) [0]

Вопрос!
Программа поддерживает скины. При сохранении программой файла, ссылка на скин херится, и пишется путь к сохраненному файлу!
Пишу я так "../skin(dir)/skin.bmp".

P/S
Только начинаю кодит! %(


 
Чувак   (2004-07-02 13:05) [1]

Тут нужно сам код видеть.


 
Fox Mulder   (2004-07-26 06:22) [2]

кажеться я понял в чем проблема. Я сделал так: взял Directorylistbox, при запуске программы в нее попадает путь к папке где лежит прога. В OnCreate я беру этот путь ( edit1.text:=directorylistbox1.directory; ) и потом вставляю к image ( image1.picture.loadfromfile(edit1.text + "skin.bmp"); )


 
grom   (2004-07-26 10:46) [3]

может надо так
uses SysUtils
..............
image1.picture.loadfromfile(ExtractFileDir(ParamStr(0)) + "skin.bmp");


 
Fox Mulder   (2004-07-27 03:05) [4]

To grom >>Непробовал. Но врядли.


 
aLexx   (2004-07-27 06:30) [5]

Наверно, меняется текущая директория. Попробуй указывать абсолютные пути.


 
AGalenchikov   (2004-07-28 11:35) [6]

Я тож со скинами баловался делал просто OnCreat загружал картинки из директории в виде (get dir(per,0)+"\skin\"+skin_par+"background.bmp") ,а в директории было несколько папок они были скинами (содержали картинки) и в корне папки скинс стандартные картинки(типа дефолт)... перемення skins_par это имя скина который гденить храниться... соответственно если он не определён то загружает стандартные картинки... но это был сырой код... навороты ты и сам можешь написать


 
П7   (2004-07-28 12:10) [7]

Получаешь текущую директорию:

GetDir( 0, PathDir );

Далее делаешь с этой директорией всё, что только заблагорассудится...

Image1.Picture.LoadFromFile( PathDir+"skin.bmp" );



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.08 c
14-1096890677
Marker
2004-10-04 15:51
2004.10.24
Можно ли заставить Excel...


1-1097147570
Yuri Btr
2004-10-07 15:12
2004.10.24
Вопрос по быстрому преобразованию Фурье


3-1096299871
Fredericco
2004-09-27 19:44
2004.10.24
Компоненты для работы с БД PostgreSQL.


4-1095408289
gs
2004-09-17 12:04
2004.10.24
Данные системы


1-1097563467
aleshap
2004-10-12 10:44
2004.10.24
Возможно ли в Delphi косвенно выполнить команду




   Наверх