Исходники Delphi

Добро пожаловать на наш портал

На нашем сайте ежедневно публикуются десятки качественных и свежих материалов, которые Вы можете скачать абсолютно бесплатно. Рекомендуем Вам добавить Наш сайт в закладки, а также подписаться на RSS ленту, чтобы не пропускать интересных новостей.
Стартовая Избранное Главная Контакты Карта сайта

Меню

Не доступно

Не доступно

Опрос

Оцените мой сайт

Проголосовало: 118
Другие опросы

Главная » Графика, оформление
id: 130 Комментарии: 0 Просмотров: 1180 Автор: Reif Категория: Графика, оформление
Нажмите для увеличения на картинку
Плавное исчезание формы, в событии OnClose пропишите код

Код
AnimateWindow(handle, 2000, AW_BLEND or AW_HIDE)
id: 114 Комментарии: 0 Просмотров: 860 Автор: Reif Категория: Графика, оформление
Нажмите для увеличения на картинку


Photos
Простенькая программа – альбом фотографий.

Download

http://delphisources.do.am/Files/photos_src.zip
id: 110 Комментарии: 0 Просмотров: 932 Автор: Reif Категория: Графика, оформление
Нажмите для увеличения на картинку


Cкачать исходник
id: 108 Комментарии: 0 Просмотров: 1106 Автор: Reif Категория: Графика, оформление
Нажмите для увеличения на картинку
Простая программка которая из списка загружает на форму картинку


Код

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, StdCtrls;

type
TForm1 = class(TForm)
ComboBox1: TComboBox;
Image1: TImage;
procedure FormCreate(Sender: TObject);
procedure ComboBox1Change(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;

var
Form1: TForm1;

implementation
... Читать дальше »
id: 91 Комментарии: 0 Просмотров: 996 Автор: Reif Категория: Графика, оформление
Нажмите для увеличения на картинку





Исходник программы позволяющей рисовать, подобно стандартной программе в Windows

Скачать:
http://delphisources.do.am/Files/paint.rar

id: 78 Комментарии: 0 Просмотров: 1441 Автор: Reif Категория: Графика, оформление
Нажмите для увеличения на картинку
Как сделать пункты меню с картинками

Следующий код показывает, как добавить картинку в виде объекта TImage в объект TMenuItem.

Код
var  
  hHandle: THandle;  
  x: integer;  
  // visual controls:  
  hMenu: TMenuItem;  
  Image1: TImage;  

...  

  x:= 10; // десятый пункт меню
  hHandle := GetMenuItemID(hMenu.handle, x);  
  ModifyMenu(hMenu.handle, hHandle, MF_BYCOMMAND Or MF_BITMAP, hHandle,  
 &nb ... Читать дальше »
id: 63 Комментарии: 0 Просмотров: 2369 Автор: Reif Категория: Графика, оформление
Нажмите для увеличения на картинку
Zoom [Исходник на Delphi]

Пример создания экранной лупы.
Download:
id: 58 Комментарии: 0 Просмотров: 1072 Автор: Reif Категория: Графика, оформление
Нажмите для увеличения на картинку
Анимированное появление формы с использованием прозрачности



Download
id: 22 Комментарии: 0 Просмотров: 952 Автор: Reif Категория: Графика, оформление
Нажмите для увеличения на картинку
Исходный код программы позволяющей делать скриншоты экрана. Есть возмоэность мультсьемки, по умолчанию сохраняет изображения в папку где расположенна программа.

id: 21 Комментарии: 0 Просмотров: 981 Автор: Reif Категория: Графика, оформление
Нажмите для увеличения на картинку
Никаких элементов управления на форме нету, и обрабатывают события формы OnPaint и OnResize. По первому из этих событий приложение будет раскрашивать окно требуемым способом, а обработка события OnResize, генерируемого, когда пользователь изменяет размер окна, будет состоять в вызове метода Repaint для перерисовки окна приложения. 
 
Код программы: 

Код
procedure TForm1.FormPaint(Sender: TObject); 
var 
DeltaR, DeltaG, DeltaB: Double; 
ColorFrom, ColorTo: TColor; 
I: Integer; 
begin 
ColorFrom := clRed; 
ColorTo := clYellow; 
DeltaR := (GetRValue(ColorTo)-GetRValue(ColorFrom))/Width; 
DeltaG := (GetGV ... Читать дальше »
1 2 »

Название блока

Здесь html код

Название блока

Здесь html код

Название блока

Здесь html код

Название блока

Здесь html код

 
Исходники Delphi
Сделать бесплатный сайт с uCoz |