Недавно добавленные исходники
• TDictionary Custom Sort 522 • Fast Watermark Sources 884 • 3D Designer 1 816 • Sik Screen Capture 1 461 • Patch Maker 1 470 • Айболит (remote control) 1 393 • ListBox Drag & Drop 1 168 • Доска для игры Реверси 21 456 • Графические эффекты 1 343 • Рисование по маске 1 283 • Перетаскивание изображений 1 094 • Canvas Drawing 965 • Рисование Луны 806 • Поворот изображения 764 • Рисование стержней 806 • Paint on Shape 492 • Генератор кроссвордов 755 • Головоломка Paletto 662 • Теорема Монжа об окружностях 847 • Пазл Numbrix 612 • Заборы и коммивояжеры 839 • Игра HIP 552 • Игра Go (Го) 525 • Симулятор лифта 544 • Программа укладки плитки 506 • Генератор лабиринта 561 • Проверка числового ввода 521 • HEX View 597 • Физический маятник 523 • Задача коммивояжера 557

Главная страница

Исходники (более 1 300 исходных кодов)

Компоненты

Форма во весь экран 2

procedure TForm1.FormShow(Sender: TObject);
var
  r : TRect;
begin
  SystemParametersInfo(SPI_GETWORKAREA, 0, @r,0);
  Form1.SetBounds(r.left, r.top, r.Right - r.left, r.bottom - r.top);
end;

Форма во весь экран 2

Похожие по теме исходники