Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Разное > Ваши программы
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 25.09.2009, 07:45
Аватар для AleD
AleD AleD вне форума
Активный
 
Регистрация: 21.02.2009
Адрес: г.Краснокаменск
Сообщения: 383
Репутация: 91
Лампочка QuickMenu

QuickMenu - маленькая программка для организации быстрого доступа к частозапускаемым программам. Доступ осуществляется через небольшое меню из трея. Программу делал на заказ, пользуется ею 1 человек, вот вылаживаю что-бы не пропали труды (какие ни какие, но всё же труды)
Изображения
Тип файла: jpg 2.JPG (61.2 Кбайт, 83 просмотров)
__________________
TAleD = class(TUser)
public
function HelpMe(ASubject, ARequest: String): String;
function GiveMeExample(ASubject: String): TStringList;
procedure WriteReview(APost: Integer; ADescription: TStringList);
end;

Последний раз редактировалось AleD, 18.11.2009 в 08:46.
Ответить с цитированием
  #2  
Старый 25.09.2009, 16:54
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
 
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию

Я сам такую делал)))
Зачот +1, полезная штука. Опробывать не буду, ибо лень.
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
Ответить с цитированием
  #3  
Старый 18.11.2009, 00:02
kibroma kibroma вне форума
Прохожий
 
Регистрация: 17.11.2009
Сообщения: 1
Репутация: 10
По умолчанию

Только ссылка ведёт на скрин
а Качаем с Dump- браузер пишет, что сайт вредоносный... стрёмно качать...
выложы где то, я только пытаюсь что то писать, вот хотел такую же как у тебя, по крайней мере попытатся...

Последний раз редактировалось kibroma, 18.11.2009 в 00:10.
Ответить с цитированием
  #4  
Старый 18.11.2009, 00:22
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,057
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Ну так сделай.
Работы, по хорошему, на 1 день.
Для значка в трее пользуй TCoolTrayIcon.
Ответить с цитированием
  #5  
Старый 18.11.2009, 08:48
Аватар для AleD
AleD AleD вне форума
Активный
 
Регистрация: 21.02.2009
Адрес: г.Краснокаменск
Сообщения: 383
Репутация: 91
По умолчанию

Цитата:
Сообщение от kibroma
Только ссылка ведёт на скрин
а Качаем с Dump- браузер пишет, что сайт вредоносный... стрёмно качать...
выложы где то, я только пытаюсь что то писать, вот хотел такую же как у тебя, по крайней мере попытатся...
первый пост - новые ссылки
__________________
TAleD = class(TUser)
public
function HelpMe(ASubject, ARequest: String): String;
function GiveMeExample(ASubject: String): TStringList;
procedure WriteReview(APost: Integer; ADescription: TStringList);
end;
Ответить с цитированием
  #6  
Старый 01.12.2009, 08:57
Аватар для RusMaXXX
RusMaXXX RusMaXXX вне форума
Начинающий
 
Регистрация: 01.10.2008
Сообщения: 138
Версия Delphi: 7
Репутация: 21
По умолчанию Fast Start

вот небольшой аналог твоей проги

http://www.delphisources.ru/pages/so...ast-start.html

Описание: Fast Start (04.05.2009) - исходник программы, предназначенной для ускорения запуска приложений путем создания списка для быстрого запуска, программа позволяет существенно сэкономить место на экране - Автор RusMaXXX.

Последний раз редактировалось RusMaXXX, 01.12.2009 в 09:06.
Ответить с цитированием
  #7  
Старый 01.12.2009, 09:20
Аватар для Karsh
Karsh Karsh вне форума
Активный
 
Регистрация: 22.09.2007
Адрес: SPb
Сообщения: 228
Версия Delphi: 7, 2009, XE2
Репутация: 70
По умолчанию

RusMaXXX, у меня при компиляции этой проги НОД32 на вирус ругается...
AleD, спасибо, прога замечательная. Очень удобно и лишнее место на раб. столе экономит Но одно "но": прога не умеет работать с ярлыками, мелочь, но немного неудобно при создании ссылки...
__________________
Начинающий программист уверен, что в 1 килобайте 1000 байт.
Законченный программист уверен, что в 1 километре 1024 метра.

Последний раз редактировалось Karsh, 01.12.2009 в 09:23.
Ответить с цитированием
  #8  
Старый 01.12.2009, 13:01
Аватар для RusMaXXX
RusMaXXX RusMaXXX вне форума
Начинающий
 
Регистрация: 01.10.2008
Сообщения: 138
Версия Delphi: 7
Репутация: 21
По умолчанию

Цитата:
Сообщение от Karsh
RusMaXXX, у меня при компиляции этой проги НОД32 на вирус ругается...
AleD, спасибо, прога замечательная. Очень удобно и лишнее место на раб. столе экономит Но одно "но": прога не умеет работать с ярлыками, мелочь, но немного неудобно при создании ссылки...

кстати, Fast Start умеет работать с ярлыками, так же можно добавлять ссылки на ресурсы путем drag and drop ....

у меня при компиляции данного исходника КИС 2009 (обновленный) молчит.... возможно у тебя одно из двух : 1- делфи заражен; 2- у твоего НОД32 базы старые...

и ещё на заметку:

при компиляции делфи "компанует" файл на основе твоих файлов (библиотек), а в исходнике лежат только ссылки на библиотеки, в конце получается ехе'ник...

почему тогда админ выложил мой исходник на всеобщее обозрение (т.е., когда я отправил его, он мог бы его не выкладывать в раздел исходники если бы он был заражен), вывод: обнови НОД32 и проверь свой ПК.....

Последний раз редактировалось RusMaXXX, 01.12.2009 в 13:10.
Ответить с цитированием
  #9  
Старый 01.12.2009, 21:15
Аватар для VladOfMonster
VladOfMonster VladOfMonster вне форума
Начинающий
 
Регистрация: 27.09.2009
Сообщения: 113
Репутация: 9
Лампочка

Цитата:
Сообщение от Karsh
у меня при компиляции этой проги НОД32 на вирус ругается...
NOD32 на Dr.Web CureIt тоже ругается, что это вирус, если запустить CureIt
Ответить с цитированием
  #10  
Старый 27.12.2009, 19:11
Аватар для Karsh
Karsh Karsh вне форума
Активный
 
Регистрация: 22.09.2007
Адрес: SPb
Сообщения: 228
Версия Delphi: 7, 2009, XE2
Репутация: 70
По умолчанию

RusMaXXX, извиняюсь, у меня была вот эта бяка. Странно, но НОД32 его не находил. Недавно поставил Антивиру, она нашла.
Заценил вашу програмку, но программа AleD'а понравилась больше. В вашей программе нельзя изменять порядок в списке, нельзя давать имена ярлыкам, а это минусы.
__________________
Начинающий программист уверен, что в 1 килобайте 1000 байт.
Законченный программист уверен, что в 1 километре 1024 метра.

Последний раз редактировалось Karsh, 27.12.2009 в 19:22.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 06:47.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter