как присоеденит к программе без формы иконку?

← →
userrrrr (2005-09-26 17:29) [0]

как присоединить иконку к программе без формы (ярлык на рабочий стол)

← →
y-soft © (2005-09-26 17:31) [1]

Через IShellLink

← →
userrrrr (2005-09-26 17:41) [2]

это как по подробнее пожалуйста

← →
y-soft © (2005-09-26 17:43) [3]

Самое подробное описание:

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/shell/reference/ifaces/ishelllink/ishe lllink.asp

← →
y-soft © (2005-09-26 17:47) [4]

Вот, попроще:

http://delphi.about.com/od/kbwinshell/l/aa091499.htm

← →
userrrrr (2005-09-26 18:16) [5]

а еще проще нет чтоб по русски, я чето не понял у меня есть готовая иконка i.ico ее просто можно если бы была форма в параметрах прописать а когда формы нет тот раздел неактивен

← →
y-soft © (2005-09-26 18:29) [6]

Ааааа... Я-то подумал, что Вам надо создать ярлык программно для файла, в котором вообще нет иконок...

Тогда просто: создать из своей иконки файл ресурса и прописать в файл DPR своего проекта в любом месте

{$R Путь_К_Файлу_с_Песурсом_Иконки.res}

Файл ресурса, надеюсь, создать сможете?

← →
userrrrr (2005-09-26 19:02) [7]

файл рессурса создать смогу, спасибо за совет!
но как программе обяснить что в ресурсе лежит иконка для неё?

← →
y-soft © (2005-09-26 21:08) [8]

>userrrrr (26.09.05 19:02) [7]

но как программе обяснить что в ресурсе лежит иконка для неё?

А вот этой директивой компилятора, про которую я писал, и объяснить:

{$R Путь_К_Файлу_с_Песурсом_Иконки.res}

В результате в ресурсах программы появится ресурс иконки, теперь при создании ярлыков, да и просто при отображении файла программы в Проводнике, Total Commander"е и т.п. будет по умолчанию отображаться эта иконка...

← →
userrrrr (2005-09-26 22:12) [9]

ну хорошо иконка будет в самой программе но её еще как-то надо включить хотябы надо написать что-то вроде
Res:=TResourceStream.Create(hInstance, "DEFAULT",Pchar("ADDITION"));
а потом еще что-то чтоб программа поняла что это иконка для неё например сохранить её в файл и из файла загрузить как иконку только как? но это вроде че-то не то ведь когда программа еще не запущена картинка уже должна быть!

← →
Германн © (2005-09-27 01:42) [10]

2 userrrrr (26.09.05 22:12) [9]

Читай ещё раз 2 последние строчки из [8].

← →
y-soft © (2005-09-27 07:21) [11]

userrrrr (26.09.05 22:12) [9]

Windows умнее, чем Вы думаете :)

Если в ресурсах EXE прилинкована хотя бы одна иконка в формате RT_ICON, то Windows догадается ее показать. Если иконок в EXE нет, то будет показана системная иконка, ассоциированная для такого типа файлов...

← →
userrrrr (2005-09-27 21:12) [12]

не катит Project1.exe все равно со стандартной иконкой exe файла!

← →
Adder © (2005-09-28 03:36) [13]

Имхо, всё намного проще можно сделать. Если просто нужно чтобы "покатило".
Delphi умнее, чем Вы думаете -)

> userrrrr (26.09.05 18:16) [5]
> а еще проще нет чтоб по русски, я чето не понял у меня есть
> готовая иконка i.ico ее просто можно если бы была форма
> в параметрах прописать а когда формы нет тот раздел неактивен
> <Цитата>

program Project1;
{$R *.res}
begin
//
end.
Как только в проект добавлена строка {$R *.res} "тот раздел" становится активным.

← →
XGarik © (2005-09-28 13:06) [14]

А в чем бадяга-то?
Запускаем проект -> Project -> Options -> Закладка Application -> LoadIcon -> выбираем любую иконку и тыкаем ок и компилим проект. Зачем извращаться-то?

← →
XGarik © (2005-09-28 13:11) [15]

Иконка должна состоять из 2-х частей:
1 - 16x16 | 16 color
2 - 32x32 | 16 color
Сделай такую, геймора будет меньше с их отображением!

← →
userrrrr (2005-09-28 19:34) [16]

У меня дя этого требуется как минимум
program Project1;
uses
forms;
{$R *.res}
begin
Application.Run;
end.
но модуль forms силино сказывается на размерах
и еще что он означает и что такое Application.Run; только дословного перевода не надо;)

← →
Игорь Шевченко © (2005-09-28 19:38) [17]

> но модуль forms силино сказывается на размерах

Хочешь похудеть - спроси меня как.

← →
userrrrr (2005-09-28 21:47) [18]

спрашиваю!!!!

← →
Игорь Шевченко © (2005-09-28 22:57) [19]

Для начала убери forms и Appliaction.Run

← →
XGarik © (2005-09-29 08:58) [20]

А судьба ASPackом замять? Вес сразу раза в 2-3 уменьшается!

← →
XGarik © (2005-09-29 09:03) [21]

Вопрос к userrrrr:
Ты писал:
как присоединить иконку к программе без формы (ярлык на рабочий стол)
Я на твой вопрос ответил или нет?:
Запускаем проект -> Project -> Options -> Закладка Application -> LoadIcon -> выбираем любую иконку и тыкаем ок и компилим проект. Зачем извращаться-то?

В этом случае иконка пропишется в экзешнике после его компиляции и создавай ты хоть 10 ярлыков со своей любимой иконкой на раб. столе!

← →
Amoeba © (2005-09-29 12:08) [22]

> XGarik © (29.09.05 08:58) [20]
> А судьба ASPackом замять? Вес сразу раза в 2-3 уменьшается!
>

Вредный совет! Уменьшится размер только на диске, но памяти после загрузки будет жрать не меньше, а даже больше.

← →
XGarik © (2005-09-29 13:25) [23]

>
> > XGarik © (29.09.05 08:58) [20]
> > А судьба ASPackом замять? Вес сразу раза в 2-3 уменьшается!
>
> >
>
> Вредный совет! Уменьшится размер только на диске, но памяти
> после загрузки будет жрать не меньше, а даже больше.

Не согласен, всегда юзаю ASPack и памяти при этом кушается столько же и грузится иногда даже быстрее. А зачем тогда вообще париться над размером? Можно и RARом замять или инсталлятор сварганить - результат он сразу почувствует! А вот при использовании метода динамического создания форм и т.д. программа точно потеряет часть быстродействия!
Вопрос к автору ЦЕЛЬ СЖАТИЯ EXE-ФАЙЛА?

> грузится иногда даже быстрее

Не верю!

> Amoeba © (29.09.05 13:53) [24]
>
>
> > грузится иногда даже быстрее
>
> Не верю!

Я могу сказать также! Приведи пример программы, которую ты сжал ASPackом и она стала грузиться после этого заметно дольше! Тоже не верю!

← →
userrrrr (2005-09-29 19:53) [26]

Вопрос к XGarik:
Ты писал:
*********************************************************
Вопрос к userrrrr:
Ты писал:
как присоединить иконку к программе без формы (ярлык на рабочий стол)
Я на твой вопрос ответил или нет?:
Запускаем проект -> Project -> Options -> Закладка Application -> LoadIcon -> выбираем любую иконку и тыкаем ок и компилим проект. Зачем извращаться-то?

В этом случае иконка пропишется в экзешнике после его компиляции и создавай ты хоть 10 ярлыков со своей любимой иконкой на раб. столе!
*********************************************************

я же говорил Запускаем проект -> Project -> Options -> Закладка Application -> LoadIcon НЕ АКТИВНО пока не включеш модуль forms!!!

← →
userrrrr (2005-09-29 20:09) [27]

ответ XGarik:
у мня нет цели сжать exe файл!
у меня есть цель присоединить к нему картинку более рациональным способом чем нафиг не нужное использование метода динамического создания форм!

userrrrr (29.09.05 20:09) [27]

File|New Application

1) Закрываешь окно редактора с unit1, на вопрос Save Changes отвечаешь No.
2) Project|Options|Application|Load Icon - выбираешь иконку.
3) Project|View Source - редактируешь файл проекта

3.1) убираешь uses Forms
3.2) убираешь между begin и end все, что связано с Application

4) Компилируешь.
5) Смотришь проводником и радуешься - у получившегося EXEшника выбранная тобой иконка.

Если после этого у тебя чего-то не получается, идешь по ссылке

http://ln.com.ua/~openxs/articles/smart-questions-ru.html

и читаешь ее два, а лучше три раза. Каждый раз наизусть.

← →
userrrrr (2005-09-29 20:35) [29]

нет!
я после пункта 5 смотрю Project|Options|Application|Load Icon там все не активно почему?
а какого формата должна быть картинка?

> userrrrr (29.09.05 20:35) [29]
>
> нет!
> я после пункта 5 смотрю Project|Options|Application|Load
> Icon там все не активно почему?
> а какого формата должна быть картинка?
>

Я просто тебя не понимаю? Что значит рационально прикрепить картинку. Ты же сам писал, что иконку т.е. файл *.ico...

> я после пункта 5 смотрю Project|Options|Application|Load
> Icon там все не активно почему?

КУПИ ЛИЦЕНЗИЮ!

← →
userrrrr (2005-09-29 21:05) [32]

ну да *.ico

userrrrr (29.09.05 20:35) [29]

> Если после этого у тебя чего-то не получается, идешь по
> ссылке
>
> http://ln.com.ua/~openxs/articles/smart-questions-ru.html
>
> и читаешь ее два, а лучше три раза. Каждый раз наизусть.
>

Намек ясен ?

как присоеденит к программе без формы иконку? Найти похожие ветки