Архив исходников программ, модулей и компонентов на Delphi


Начальная страница

Поиск по базе



Операционная система
Настройка приложения
Взаимодействия приложений
Файлы и директории
Строки и символы
Математика
Базы данных
Интернет и сеть
Мультимедиа
Аппаратная часть
VCL
Другие разделы [0]
 

Количество записей в базе - 537
Сегодня добавлено – 0

Управление приложением


Добавить код в данный раздел
 Копирование текста из чужого консольного окна в файл

procedure ScreenConsoleBuffer;

Прислал: Fktrc (Кемерово) ( 30 июня 2006 г. )
Количество просмотров: 1603


 Задержка, аналогична стандартным

procedure Delay_Wait(amSecs : Integer);

Прислал: PZ ( 4 декабря 2004 г. )
Количество просмотров: 2481


 Замена штатного Application.ProcessMessages

procedure ProcessMessagesEx;

Прислал: ssk (Харьков) ( 7 сентября 2004 г. )
Количество просмотров: 2947


 Запуск программ из консольного приложения

Function RunExtFile(const FileName: String): boolean;

Прислал: Сергеев Юрий (Набережные Челны) ( 29 августа 2004 г. )
Количество просмотров: 2458


 Еще функция для проверки запуска копии приложения.

function isRunning(aUniqueString:String): Boolean;

Прислал: panov ( 30 марта 2004 г. )
Количество просмотров: 2006


 Сворачивает все приложение при сворачивании неглавного окна.

Procedure TF_Shop.WMSysCommand(var message: TWMSysCommand);

Прислал: Vemer (Петрозаводск) ( 17 марта 2004 г. )
Количество просмотров: 1679


 Системное меню приложения

procedure ExtendSysMenu(HNDL: THandle; AddMenu: TMainMenu);

Прислал: Davyd (Самара) ( 4 апреля 2003 г. )
Количество просмотров: 2657


 Получение параметров командной строки приложения

function Parameters: string;

Прислал: Dimka Maslov (Санкт-Петербург) ( 29 марта 2003 г. )
Количество просмотров: 2612


 Вывод пояснения о текущей операции.

function ShowWaitMsg(msg:string; TxColor, BgColor, BvColor:tcolor):tform;

Прислал: Роман Василенко (Пятигорск) ( 23 сентября 2002 г. )
Количество просмотров: 3013


 Вариант процедуры Delay

procedure Delay(Seconds: Real)

Прислал: Voldemar (Санкт-Петербург) ( 31 июля 2002 г. )
Количество просмотров: 4244


 Процедура Delay (как в паскале)

procedure Delay(Zadergka: Longint);

Прислал: demon-777 (Питер) ( 23 мая 2002 г. )
Количество просмотров: 3114


 "Сворачивание" программы в трей

intermediate MinimizeToTray

Прислал: Song (Кострома) ( 17 июня 2002 г. )
Количество просмотров: 4675


 Запуск одной копии приложения (Mutex-базированный)

function Init_Mutex(mid:string):boolean;

Прислал: Роман Василенко (Пятигорск) ( 14 июня 2002 г. )
Количество просмотров: 3363


 Перемещение формы мышкой

intermediate onMouseDown

Прислал: ОсиповЕвгений Анатольевич (Бузулук) ( 31 мая 2002 г. )
Количество просмотров: 2959


 Мигание кнопкой программы на панели задач

function FlashWindow();

Прислал: ОсиповЕвгений Анатольевич (Бузулук) ( 31 мая 2002 г. )
Количество просмотров: 3278


 Предотвращение запуска второй копии и активация приложения (доработка)

intermediate SingleForm

Прислал: ALFA ( 13 мая 2002 г. )
Количество просмотров: 3576


 Запрет запуска копии приложения

intermediate SingleApp

Прислал: anod (Ростов - на - Дону) ( 26 апреля 2002 г. )
Количество просмотров: 3283


 Предотвращение запуска второй копии приложения

intermediate SingleForm

Прислал: easy (Мурманск) ( 26 апреля 2002 г. )
Количество просмотров: 3031


 Сохранение и восстановление положения и размеров окон

procedure SaveWndPos; procedure SetWndPos; procedure FitDeskTop

Прислал: Александр Хабаров aka Desdechado (Феодосия) ( 13 мая 2002 г. )
Количество просмотров: 3655


 Создание курсора с процентом выполнения

function create_prc_cursor(min,max,pos:integer):hicon;

Прислал: Роман Василенко (Пятигорск) ( 07 мая 2002 г. )
Количество просмотров: 3923


 Отображение главного окна приложения на переднем плане

procedure JumpUp;

Прислал: Dimka Maslov (Санкт-Петербург) ( 29 апреля 2002 г. )
Количество просмотров: 3175




Добавить код в данный раздел

Наверх ▲