приведите примеры программ написанных на языке делфи или игр

Question

приведите примеры программ написанных на языке делфи или игр

Adolf Профи (512), закрыт 13 лет назад

Answer 1

Программы:

Total Commander (а то! )
Skype для Windows (только интерфейс)
Delphi IDE — (от Delphi 1 до Delphi XE, а также все студии под Builder, Rad Studio и даже какие-то ранние версии JBuilder)
PL/SQL Developer
TOAD
PartitionMagic
PHPEdit
BS Player
Inno Setup
Macromedia Captivate
Macromedia HomeSite
AdAware
FL Studio (ex-Fruity Loops)
Age of Wonders
Doom: The Roguelike
TuneUp Utilities
Auslogics Disk Defrag (и все их продукты)
Webroot Spy Sweeper
Scanner
Space Rangers 2 (игра 2004)
Space Empires 4,5 (игра 2000)
AIMP2
FastStone Image Viewer
Spybot — Search & Destroy
The KMPlayer (не тот w:KMPlayer, который для KDE, а другой, по некоторым данным, нарушающий GPL)
PE Explorer
Resource Hacker
SASPlanet

Насчет игр не знаю.

Answer 2

Ly Мыслитель (9505) 13 лет назад

тотал командер

Answer 3

ПРИМЕР ПРОГРАММЫ, НАПИСАННОЙ В ДЕЛЬФИ:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
s: String[255];
c: array[0..255] of Byte absolute s;
i: Integer;
begin
s := Form1.Edit1.Text;
for i := 1 to Ord(s[0]) do c := 23 xor c;
Form1.Edit2.Text:=s;
s := Form1.Edit2.Text;
for i := 1 to Length(s) do s := AnsiChar(23 xor Ord(c));
Form1.Edit3.Text := s;
end;
end.

Answer 4

Игры

Age of wonders
Космические рейнджеры
Космические рейнджеры 2
Venom. Codename: Outbreak
Space Empires 4
Space Empires V
Pythian project
Битва героев
GTA 2
Правда о девятой роте.