Навигация
Главная
Поиск
Форум
FAQ's
Ссылки
Карта сайта
Чат программистов

Статьи
-Delphi
-C/C++
-Turbo Pascal
-Assembler
-Java/JS
-PHP
-Perl
-DHTML
-Prolog
-GPSS
-Сайтостроительство
-CMS: PHP Fusion
-Инвестирование

Файлы
-Для программистов
-Компонеты для Delphi
-Исходники на Delphi
-Исходники на C/C++
-Книги по Delphi
-Книги по С/С++
-Книги по JAVA/JS
-Книги по Basic/VB/.NET
-Книги по PHP/MySQL
-Книги по Assembler
-PHP Fusion MOD'ы
-by Kest
Professional Download System
Реклама
Услуги

Автоматическое добавление статей на сайты на Wordpress, Joomla, DLE
Заказать продвижение сайта
Программа для рисования блок-схем
Инженерный калькулятор онлайн
Таблица сложения онлайн
Популярные статьи
OpenGL и Delphi... 65535
Форум на вашем ... 65535
21 ошибка прогр... 65535
HACK F.A.Q 65535
Бип из системно... 65535
Гостевая книга ... 65535
Invision Power ... 65535
Пример работы с... 65535
Содержание сайт... 65535
ТЕХНОЛОГИИ ДОСТ... 65535
Организация зап... 65535
Вызов хранимых ... 65535
Создание отчето... 65535
Имитационное мо... 65535
Программируемая... 65535
Эмулятор микроп... 65535
Подключение Mic... 65535
Создание потоко... 65535
Приложение «Про... 65535
Оператор выбора... 65535
Реклама
Сейчас на сайте
Гостей: 17
На сайте нет зарегистрированных пользователей

Пользователей: 13,362
новичок: uvapke
Новости
Реклама
Выполняем курсовые и лабораторные по разным языкам программирования
Подробнее - курсовые и лабораторные на заказ
Delphi, Turbo Pascal, Assembler, C, C++, C#, Visual Basic, Java, GPSS, Prolog, 3D MAX, Компас 3D
Заказать программу для Windows Mobile, Symbian

Меры близости на векторах в Delphi + Блок схемы
Двунаправленный динамический список на Delphi + Блок схемы
Моделирование процесса поступления заявок в систему, состоящую из трёх Э...

Программа формирование списка тетрад по польской записи



Программа предназначена для составления списка тетрад по заданной польской записи арифметического (логического) выражения.

Идентификаторы:
num – номер вершины стека;
znak – оператор (унарный или бинарный);
id1 – первый операнд в тераде;
id2 – второй операнд в тераде;
prom – переменная, содержащая промежуточные данные

Описание логической структуры
Исполняемый файл программы – «PolTetr.exe». Программа загружает из файла load.txt выражение в польской записи, затем выполняет преобразование в список тетрад. Полученные результаты можно сохранить в файл rezultat.txt.

Схема программы
Необходимо представить заданное выражение pol (в польской записи) в виде списка тетрад. Алгоритм формирования такого списка представлен на рисунке 3.4.1. Алгоритм использует стек Stek[top], в котором хранятся промежуточные данные или полученное результирующее арифметическое (логическое) выражение. По значению pol [i] выбирается положение операндов и операторов в формируемом списке.
Примечание: Символ ‘#’ означает унарную операцию – отрицание.


Рис. 3.4.1. Блок-схема основной процедуры

Схема основной программы представлена ниже, на рисунке 3.4.2.

Рис. 3.4.2. Схема основной программы

Скриншот программы:
Программа формирование списка тетрад по польской записи

Исходный текст программы:

PolTetr.dpr

program Project1;

uses
Forms,
Unit1 in 'Unit1.pas' {Tetrad},
Unit2 in 'Unit2.pas' {Form2};

{$R *.res}

begin
Application.Initialize;
Form2:=TForm2.Create(Application);
Form2.ShowModal;
Application.CreateForm(TTetrad, Tetrad);
Application.CreateForm(TForm2, Form2);
Application.Run;
end.





Unit1.pas

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, XPMan, Menus, Buttons;

type
TTetrad = class(TForm)
Edit1: TEdit;
Memo1: TMemo;
Label1: TLabel;
Label2: TLabel;
MainMenu1: TMainMenu;
N1: TMenuItem;
N2: TMenuItem;
N3: TMenuItem;
N4: TMenuItem;
N5: TMenuItem;
N6: TMenuItem;
XPManifest1: TXPManifest;
SpeedButton1: TSpeedButton;
SpeedButton2: TSpeedButton;
SpeedButton3: TSpeedButton;
SpeedButton4: TSpeedButton;
procedure N2Click(Sender: TObject);
procedure N3Click(Sender: TObject);
procedure N4Click(Sender: TObject);
procedure N5Click(Sender: TObject);
procedure SpeedButton1Click(Sender: TObject);
procedure SpeedButton2Click(Sender: TObject);
procedure SpeedButton3Click(Sender: TObject);
procedure SpeedButton4Click(Sender: TObject);
procedure N6Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Tetrad: TTetrad;

implementation

{$R *.dfm}
type
tetr=record
znak:char;
id1,id2:string[10];
prom:string[10];
end;

procedure TTetrad.SpeedButton2Click(Sender: TObject);
var
f:textfile;
temp:string[20];

begin
Assignfile (f, 'load.txt' );
Reset (f);
Readln (f,temp);
edit1.Text:=temp;
end;

procedure TTetrad.N2Click(Sender: TObject);
begin
SpeedButton2.Click;
end;

procedure TTetrad.N3Click(Sender: TObject);
begin
SpeedButton1.Click;
end;

procedure TTetrad.N4Click(Sender: TObject);
begin
SpeedButton3.Click;
end;

procedure TTetrad.N5Click(Sender: TObject);
begin
Close;
end;

procedure TTetrad.SpeedButton1Click(Sender: TObject);
var
pol,num:string;
i,m:integer;
T:array [1..255]of tetr;
stek:array[1..255] of string[20];
begin
Memo1.Lines.Clear;
pol:=Edit1.Text;
top:=1;
m:=0;
for i:=1 to length(pol) do
case pol[i] of
'a'..'z','0'..'9':begin
stek[top]:=stek[top]+pol[i];
end;
'+','-','*','/','^':begin
m:=m+1;
T[m].znak:=pol[i];
T[m].id1:=stek[top-1];
T[m].id2:=stek[top];
str(m,num);
T[m].prom:='T'+num;
top:=top-1;
stek[top]:='T'+num;
end;
'#':begin
m:=m+1;
T[m].znak:='-';
T[m].id1:=stek[top];
T[m].id2:=' ';
str(m,num);
T[m].prom:='T'+num;
stek[top]:='T'+num;
end;
' ':begin
top:=top+1;
end;
end;
for i:=1 to m do
Memo1.Lines.Add('( '+T[i].znak+', '+T[i].id1+', '+T[i].id2+', '+T[i].prom+' )')
end;

procedure TTetrad.SpeedButton3Click(Sender: TObject);
begin
Memo1.Lines.SaveToFile('rezultat.txt');
end;


procedure TTetrad.SpeedButton4Click(Sender: TObject);
begin
Close;
end;

procedure TTetrad.N6Click(Sender: TObject);
begin
MessageBox(Handle, '',
'Информация', MB_APPLMODAL+MB_ICONINFORMATION+MB_OK);
end;

end.





Unit1.dfm
object Tetrad: TTetrad
Left = 271
Top = 2
Width = 466
Height = 564
HorzScrollBar.Color = clWhite
HorzScrollBar.ParentColor = False
Caption = #1060#1086#1088#1084#1080#1088#1086#1074#1072#1085#1080#1077' '#1089#1087#1080#1089#1082#1072' '#1090#1077#1090#1088#1072#1076
Color = clActiveCaption
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -15
Font.Name = 'Times New Roman'
Font.Style = [fsItalic]
Icon.Data = {
0000010001002020100001000400E80200001600000028000000200000004000
0000010004000000000080020000000000000000000000000000000000000000
0000000080000080000000808000800000008000800080800000C0C0C0008080
80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
0000000055555500000077777000000000000005DDDDDD500007777770000000
0000005DDDDDDDD00444477700000000000000DDD00000D04444777000000007
777000DD000000044447770000000007777700DD000000444477700000004440
777700DD5000045444770000000044444077700DD55555D44770000000000444
4407770DDDDDDDD47700000000000004444777700DDDDD477077777770000000
4444077000044447707777777700000004444777077444499999990077700000
0044447777444479999999900770000000044477444444779907799907700004
4000444447044477990770990770000444444447770444779907709977000000
0000044077044777990777997700000000000044070447709907799770000000
0000004407744770999999977700000000000004474447709999990077000000
0000000444444770990799907700000000000000444477709907799077000000
0000000044447700990779977700000000000000044477009977799770000000
0000000004447700997799970000000000000000044477099999990000000000
0000000000440709999990000000000000000000004407000000000000000000
0000000000040000000000000000000000000000000400000000000000000000
000000000004000000000000000000000000000000000000000000000000FFF0
3F07FFE01E07FFC0180FFFC7D01FE1CFE03FE0CFC07F10C780FF046001FF8220
03FFE0180407F09E0403F8080031FC000019FE000209E7020249E0020243FF92
0203FFCA1207FFC81003FFE01033FFE01213FFF01213FFF03203FFF83007FFF8
300FFFF8203FFFFCA07FFFFCBFFFFFFEFFFFFFFEFFFFFFFEFFFFFFFFFFFF}
Menu = MainMenu1
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 17
object Label1: TLabel
Left = 160
Top = 192
Width = 159
Height = 24
Caption = #1057#1087#1080#1089#1086#1082' '#1090#1077#1090#1088#1072#1076
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -19
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold, fsItalic]
ParentFont = False
end
object Label2: TLabel
Left = 144
Top = 16
Width = 179
Height = 24
Caption = #1055#1086#1083#1100#1089#1082#1072#1103' '#1079#1072#1087#1080#1089#1100
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -19
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold, fsItalic]
ParentFont = False
end
object SpeedButton1: TSpeedButton
Left = 176
Top = 144
Width = 121
Height = 41
Caption = #1042#1099#1087#1086#1083#1085#1080#1090#1100
Glyph.Data = {
76020000424D7602000000000000760000002800000020000000200000000100
0400000000000002000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777777777777777700000000000077777777777777777777078889888880
777777777777777777770F7799977780000000000000000000070F7999977780
888888888888888888070F999999778087777777888888888807099977997780
8777778888888888880709977799978087777888888888888807097777799980
877788888888880000000F7777799990877880000000008888880F7777779990
878807777777777877770FFFFFFFF99088807777777777777777000000000000
88077FFFFFFFF7777777777077777778807FFFFFFFFFFFF77FFF777077777788
0FFFFF777FFFFFFFFFFF7770777778807FFF00077FFFFFFFFFFF777044488807
FFF000077FFFFFFFFFFF77704444440FFF0077077FFFFFFFFFFF77707777CC7F
F0807007FFFFFFF0000077707777040F0C807077FFFFFF00770777707770F740
4E40077FFFFFFF07770777707770FF7044E74C7FFFFFF077770777707770FF00
8044E4CFFFFFF0777707777077700FF708044E74CFFF07777707777077770FFF
007FC44E44CF077777077770000000FF70FFFF44E740000000077777777770FF
FFFFFFFC44E4C077777777777777770FFFFFF8F8004E74C77777777777777770
FFFF8F8077C44E44C7777777777777770FFF0007777704E74077777777777777
7000777777777C44E47777777777777777777777777777C04777}
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 176
Top = 80
Width = 121
Height = 41
Caption = #1047#1072#1075#1088#1091#1079#1080#1090#1100
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -15
Font.Name = 'Times New Roman'
Font.Style = [fsItalic]
Glyph.Data = {
76020000424D7602000000000000760000002800000020000000200000000100
0400000000000002000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00770000777777
7777777777777777777770600000000000000000000000000077066077777777
7777777777777777007700600000000000000000000000008077060000FFFFF7
FFFFFFFFF0087770807706E660EFFFF7FFFFFFFFF0808770807706E666077777
7777777770780870807706E6660EEEE7EEEEEEEEE0F78080807706E6600FFFF7
FFFFFFFFF0FF7800807706E660EFF8F7FFFFFFFFF0000000807706E666077708
8777777777777770807706E6660EEE80086EEEEEEEEEEEE0807706E6600FFFF0
E0077FFFFFFFFFF0807706E660EFFFF806C077FFFFFFFFF0807706E666077777
0E6C088777777770807706E6660EEEE7E0E6C066EEEEEEE0807706E6600FFFF7
FF0E6C077FFFFFF0807706E660EFFFF7FFF0E6C077FFFFF0807706E666077777
77770E6C08877770807706E6660EEEE7EEEEE0E6C066EEE0807706E6600FFFF7
FFFFFF0E6C077FF0807706E660EFFFF7FFFFFFF0E6C077F0807706E666077777
777777770E6C0880807706E6660EEEE7EEEEEEEEE0E6C080807706E6600FFFF7
FFFFFFFFFF0E4C08807706E660EFFFF7FFFFFFFFFFF0E6C0807706E666077777
7777777777770E6C087706E6660FFFF7FFFFFFFFFFF0F0E6C07770E660000000
000000000000070E6C0777000777777777777777777770F0E6C0777777777777
777777777777770F0E6077777777777777777777777777700007}
ParentFont = False
OnClick = SpeedButton2Click
end
object SpeedButton3: TSpeedButton
Left = 184
Top = 416
Width = 113
Height = 41
Caption = #1057#1086#1093#1088#1072#1085#1080#1090#1100
Glyph.Data = {
F6060000424DF606000000000000360000002800000018000000180000000100
180000000000C006000000000000000000000000000000000000C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8997D6C6C462E624332715A4CA199949A938F9994909A9693
A29E9CACAAA9B8B7B6C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8BCBBBB98745E5F30124D20066D4934EBEBEBEB
EBEBEBEBEBEBEBEBEBEBEBE8E7E7CCC8C5BEB7B1AAA0999E918A998D85958982
968D88A19B98ACA9A7B8B7B6C8C8C8C8C8C8C8C8C8BABABA98745E6331135524
077B5641F0F0F0F0F0F0F0EFF0EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
EFEEEEEEEEEEEEEEEEEEEEE9E8E873472C6D3C1EA19B97C8C8C8C8C8C8B9B9B8
99745E633113552407825E4AF4F4F4F4F4F4F4F4F4F4F4F4F4F3F4F3F3F3F3F3
F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F2F2F2F2F2F2794C316B35129B948FC8
C8C8C8C8C8B9B8B899745E623012552407866450F9F8F8F8F8F9F8F8F8F8F8F8
F8F8F8F8F8F8F7F8F8F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F6F7F7F6F7F78050
33723A16A19A96C8C8C8C8C8C8B6B6B599745E623012552407896854FDFDFDFD
FDFDFDFDFDFCFCFCFCFCFCFCFCFCFCFCFCFCFCFCFCFCFCFCFBFBFBFCFBFBFBFB
FBFBFBFBFBFB8654357A3F19A49F9CC8C8C8C8C8C8B4B3B399745E6130125524
078B6A56FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFFFEFEFEFE
FEFEFEFEFEFEFEFEFEFEFEFEFEFE8B563581441CA7A3A1C8C8C8C8C8C8B3B2B1
98745E612F125524078C6B57FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF905733884920ABA7A4C8
C8C8C8C8C8B2B1B099745E612F125524078C6B58FFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF9457
308F4D23AEABA9C8C8C8C8C8C8B1AFAE99745D602F115524078D6C59FFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFF98552B965226B3B0AEC8C8C8C8C8C8AFADAC99745E602F115524
07683C23AA9283AE9484B19686B59887B89B89BB9D8ABE9F8CC1A18DC4A38EC6
A48FC8A690CAA790CBA891C8A0879C55279C5629B7B5B3C8C8C8C8C8C8AEACAA
99745E5F2E115524075524075A2709612C0C693110703613763B167D3F198444
1C8A481F904D229550249A53269E5628A25929A55B2BA45A2BA25B2DBAB9B8C8
C8C8C8C8C8ACA9A899745E5E2D105524075725075E2A0A652F0E6D3411743915
7B3E1882431B89481E904D219651249C5527A15829A55C2BAA5E2DAD612EAB60
2EA8602FBCBBBAC8C8C8C8C8C8AAA8A699755E5D2D105524075A2708612C0C69
32106D3715743E1C7E48258C5533996340A06A48A46E4CA5704EA06C4B9F6239
B16330B46632B26432AD6433BDBCBCC8C8C8C8C8C8AAA7A69A755E5C2C105524
075C290A642F0D6A3C208788888C8C8C9E9E9EAAAAAAD1D1D1F6F6F6E5E6E6CE
CFCFA9A9AA7A6E65B86934BC6C36B96A35B26937C8C8C8C8C8C8C8C8C8A9A6A5
9A755F5B2C0F5725085F2B0B67300F6F4429959595909090B4B4B5ACACACC8C8
C8F4F4F4A0A0A0ABABABBBBCBC877C74BF6D37C47039C06E38B76D3CC8C8C8C8
C8C8C8C8C8A8A5A39B765F5A2B0F592708612C0C69321073482EA4A4A4A2A2A2
6C6C6D737373D2D2D2EBEBEB1B1B1B707070CBCBCC958880C6723ACB763CC773
3BBC7341C8C8C8C8C8C8C8C8C8A7A4A29B765F5A2B0F5A2809622D0D6B331177
4D33AEAFAFA2A2A2808080747474BCBCBCE7E7E71E1E1E797979D6D6D7A19389
CB753CD1793FC8753CB38261C8C8C8C8C8C8C8C8C8A6A3A19B765F5B2B0F5B28
09642E0E6C34117B5137B8B8B8B3B3B38B8B8BACACACEDEDEDEDEDED808080B7
B7B7D9D9D9AA9A90CD773DC6743CC28154C8C8C8C8C8C8C8C8C8C8C8C8A5A19F
9B765F5B2B0F5C290A642E0E6D34127D543BBFBFC0E5E6E6EFEFEFF7F7F7FDFD
FDFAFAFAF3F3F3EAEAEAD9D8D8AD988BC57C4BC0835AB3AEABC8C8C8C8C8C8C8
C8C8C8C8C8A4A09D9C765F5D2E11622E0E6C3512763C17865D43C1C2C2DCD6D2
DAD0C9CBBEB5BFB1A7ADA29BA69C96A8A29DAEAAA8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8B6B5B59B85788467568873658E7F75988E88A4
9E9BAEACAABDBCBCC8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8}
OnClick = SpeedButton3Click
end
object SpeedButton4: TSpeedButton
Left = 184
Top = 464
Width = 113
Height = 41
Caption = ' '#1042#1099#1081#1090#1080
Glyph.Data = {
76020000424D7602000000000000760000002800000020000000200000000100
0400000000000002000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777777777777777777777777777777777777777777777777777777777777
7777777777777777777777884888777777777777788888877777780444008877
7777777780044408777780000044088777777778044044408777800000044008
7777778040000004077780800000044088777804000000044777807884000044
0487804000004488477780877884000040000400004888780777700877788400
0444400048887780877777448777788000440004888778408777777004877778
80000088877784087777777780487F77880008877778408777777777780047FF
77888777778408777777777777780487FF777777784087777777777777778048
7FFFFFF778400777777777777778004447FFFFFF744400877777777777404444
448FFFFF78444408777777777004444444487FFFF74444400777777740444444
480047FFFF78444440777777044448888840048FFFF7844444077778044887FF
F70880047FFFF784440877784777FFFFF808784048FFFF78884877784FFFFFFF
84077788048FFFFFF788777807FFFFF80087777780047FFFFF4877770487F780
087777777880487F780877778004440487777777778800444007777778800488
7777777777778800087777777778887777777777777777888777777777777777
7777777777777777777777777777777777777777777777777777}
OnClick = SpeedButton4Click
end
object Edit1: TEdit
Left = 152
Top = 48
Width = 161
Height = 25
Color = clInactiveCaptionText
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -15
Font.Name = 'Times New Roman'
Font.Style = []
ParentFont = False
TabOrder = 0
end
object Memo1: TMemo
Left = 160
Top = 224
Width = 153
Height = 185
Color = clInactiveCaptionText
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -15
Font.Name = 'Times New Roman'
Font.Style = []
Lines.Strings = (
'')
ParentFont = False
TabOrder = 1
end
object MainMenu1: TMainMenu
Left = 288
Top = 8
object N1: TMenuItem
Caption = ' '#1060#1072#1081#1083
object N2: TMenuItem
Caption = #1047#1072#1075#1088#1091#1079#1080#1090#1100
OnClick = N2Click
end
object N3: TMenuItem
Caption = #1042#1099#1087#1086#1083#1085#1080#1090#1100
OnClick = N3Click
end
object N4: TMenuItem
Caption = #1057#1086#1093#1088#1072#1085#1080#1090#1100
OnClick = N4Click
end
end
object N5: TMenuItem
Bitmap.Data = {
F6060000424DF606000000000000360000002800000018000000180000000100
180000000000C006000000000000000000000000000000000000FFFFFFFFFFFF
FEFEFEFEFEFEFDFDFDFDFDFDFDFDFDF9F9FBF3F3F8F2F2F7F3F3F8F3F3F8F3F3
F8F3F3F8F2F2F7F2F2F7F5F5F9FAFAFBFDFDFDFDFDFDFDFDFDFFFFFFFEFEFEFF
FFFFFFFFFFFEFEFEFEFEFEFEFEFEFDFDFDFDFDFDF6F6F8E1E1DFCBCBC0C7C7BD
C8C8BEC8C8BDC8C8BDC8C8BEC8C8BEC6C6BCD4D4CAEDEDEDFAFAFBFDFDFDFDFD
FDFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFDFDFDFDFDFDF6F6F8DDDDD786
86954848944B4B944A4A924A4A924B4B914B4B904B4B8F4B4B914C4C89AEAEAD
EEEEECFAFAFBFDFDFDFDFDFDFEFEFEFEFEFEFEFEFEFEFEFEFDFDFDFDFDFCF6F6
F8DDDDD88484902F2FB52C2CE12F2FE12D2DE72E2EE62F2FE62F2FE73030E633
33E32525D92E2E8EB1B1A9EDEDEEFAFAFBFDFDFDFDFDFDFEFEFEFEFEFEFDFDFD
FDFDFCF6F6F9DDDDD88484902F2FB83333E43535E22C2CD33636C03434C73232
C93434C73333C83131DF3F3FE82B2BDD2E2E8DB1B1AAEDEDEDFAFAFBFDFDFDFD
FDFDFDFDFDFDFDFDF6F6F8DDDDD78383922F2FB93434E53434E23838C38D8DAD
BDBDC4B4B4C1AEAEBEB3B3C0B3B3BD6D6DB33030DD4040E82C2CE02E2E8CB0B0
A9EEEEEEFAFAFBFDFDFDFDFDFCF6F6F8DEDED78484922F2FBA3434E73838E230
30D2A1A1B6E7E7E9D9D9E8DCDCE8DEDEE8DCDCE8DDDDEADFDFD96A6ABF3232E8
4242E92E2EE22E2E8BB0B0A9EEEEEEFAFAFBFBFBFDE7E7E28787982E2EBC3535
E93A3AE03131E95C5CBFDDDDDCD6D6E7D7D7E3D8D8E4D8D8E5D8D8E4D6D6E3DE
DEEBC0C0CC3E3ED63D3DED4343EB3030E42E2E8AB5B5AEF5F5F5FEFEFFB7B7C0
2E2EB83535EA3939E23D3DE63131E88383C6E6E6E7DADAE8DCDCE9DDDDEADEDE
EADDDDE9DDDDE9DADAE8E4E4E47878CA3737F04040E94545EF2C2CE24E4EA4EB
EBE5FFFFFFA7A7BE2A2AD03C3CE83B3BE64040EA3434EB8C8CC8EAEAECDDDDEC
E1E1EDE1E1EDE1E1EEE1E1EDE1E1EDDDDDEAE7E7EFB1B1D13D3DE74545F24242
EC3F3FF35353D7E2E2DFFEFEFFAAAAC02C2CCF3F3FED3F3FEB4444EF3A3AF08E
8EC9EEEEF1E1E1F0E5E5F2E6E6F2E6E6F2E6E6F2E4E4F1E9E9F2E8E8F5D4D4DC
5252E04545F94747F03F3FF45454D1E4E4E0FFFFFFA8A8C02E2ED24242F24343
F04949F53F3FF49292CCF4F4F6EBEBF8EAEAF6EAEAF6ECECF8E9E9F5EEEEF9CE
CEE1DADAEAEEEEEF6F6FD24242FE4C4CF54444FA5555D3E4E4DFFFFFFFA8A8C1
3030D64646F64848F44E4EFB4444F79797CFF3F3F5CACADAF2F2FDF4F4FFF0F0
FCF1F1FEFDFDFFA0A0DAA1A1DBFFFFFFB5B5D14A4AE65050FD4747FE5555D2E3
E3DEFFFFFFA8A8C13333D94C4CFC4D4DFA5454FF4B4BF89E9ED2F0F0F2ACACC3
FBFBFFDFDFE8F7F7FDE1E1EBF9F9F8B3B3E45757EDC4C4EFEBEBEF6F6FE34E4E
FE4D4DFF5656D2E3E3DEFFFFFFA8A8C13535DC5151FF5252FD5A5AFE5151F9A3
A3D4F4F4F1B3B3C4FEFEFEA7A7BBFDFDFCB0B0C8F0F0EDBBBBE35959F96060FB
6D6DF85E5EFE5858FD5050FE5656D1E2E2DEFEFEFEA9A9C23939DF5656FE5959
FC6161FF5959F8A7A7D5F3F3EFB1B1BDFFFFFFACACC2FDFDFCB5B5CEF3F3F0BC
BCE46464F76F6FFF6363FE6161FE5E5EFD5555FE5858D1E2E2DDFFFFFFACACC9
3838E16060FF5D5DFC6767FE6161FAA9A9D9FAFAEFB3B3C6FEFEFEAEAEC5FCFC
FCB5B5CCF2F2EFBFBFE36D6DF87676FE6F6FFD6969FF6464FC5C5CFF5757D4E8
E8E4FCFCFEE3E3EA5353D45252F96B6BFF6B6BFD7070FE8787F5A1A1F0AAAAD6
FEFEFCADADC3FCFCFBB5B5CBF1F1EFC0C0E37676F87D7DFE7676FE6F6FFD6E6E
FF5454F99191E0FBFBF7FBFBFDFFFFFFDFDFEA5151D65F5FF97979FF7979FD80
80FF7676FBADADD4FFFFFDAFAFC4FCFCFCB7B7CAF4F4F0C5C5E27E7EF78686FF
7C7CFD7C7CFF5E5EF98D8DE1FBFBF6FDFDFEFEFEFEFBFBFDFFFFFFDFDFEA5454
D66E6EF98989FF8989FD8B8BFDACACE0F2F2F6B2B2D0FDFDFBB8B8D4E5E5EBC3
C3ED8989FB8C8CFD8C8CFF6767F88C8CE0FBFBF5FDFDFFFDFDFDFEFEFEFEFEFD
FBFBFCFFFFFFDEDEEA5656D77C7CFA9898FF9494FD9C9CFCA1A1F8A7A7E0FDFD
F2BDBDE89D9DF69F9FFC9696FD9B9BFF7171F88B8BE0FBFBF6FDFDFFFCFCFDFE
FEFEFEFEFEFEFEFEFEFEFEFBFBFCFFFFFFDCDCEA5959D88A8AFAACACFFACACFF
B0B0FFB4B4FBC5C5F4B9B9FCB1B1FFAEAEFFADADFF7A7AF78A8ADFFBFBF6FDFD
FFFCFCFDFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFBFBFDFFFFFFDBDBEB5F
5FDA7C7CF48787F68A8AF68C8CF78989F88B8BF78A8AF58989F67575F28C8CDF
FAFAF5FDFDFFFCFCFDFEFEFEFEFEFEFEFEFEFFFFFFFEFEFEFEFEFEFEFEFEFEFE
FEFBFBFDFFFFFFE0E0F09D9DE7A2A2E8A1A1E8A1A1E8A1A1E8A0A0E89F9FE89D
9DE8AAAAE8FBFBF7FEFEFFFCFCFDFEFEFEFFFFFFFEFEFEFFFFFF}
Caption = #1042#1099#1093#1086#1076
OnClick = N5Click
end
object N6: TMenuItem
Bitmap.Data = {
360C0000424D360C000000000000360000002800000020000000200000000100
180000000000000C000000000000000000000000000000000000C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8B2B2B2ACACACAFAFAFB5B5
B5C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8AEAEAE8A8F916B95A6728B949093
94A6A6A6AEAEAEB6B6B6C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8B8B8B8A1A1A16A91A169AFCD67ABC865A9
C56691A4728086929394A0A0A0A8A8A8AFAFAFB5B5B5B9B9B9C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8B0B0B09192936AAECA63A5C15B99B25792
AA5690A75690A7578EA55A75806E76798686868F8F8F989898A0A0A0A2A2A2A3
A3A3A4A4A4A8A8A8B0B0B0C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8A7A7A773828967ABC76695A994ACB699AF
B89AAFB896ACB692AAB392AAB492AAB48D9EA58688898888888B8B8B8B8B8B8B
8B8B8C8C8C8E8E8E919191AEAEAEC8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8B6B6B69E9E9E6A94A663A5C07A8B92CCCCCCDDDD
DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD
DDDDDDDDDDDDDDDDA7A7A7A2A2A2BBBBBBC8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8AFAFAF8D8F906CB1CE5F9DB69C9E9FCCCCCCDDDD
DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD
DDDDDDDDDDDDDDDDA6A6A69E9E9EB9B9B9C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8A7A7A771838B6AAFCC7CA4B5D7D7D7CECECEDDDD
DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD
DDDDDDDDDDDDDDDD9F9F9FA0A0A0BBBBBBC8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8B5B5B59B9B9B6CA2B766A9C5A5B9C0D3D3D3DBDBDBDCDC
DCCACACA969594746A64625249625249746A64969594CACACADCDCDCDDDDDDDD
DDDDDDDDDDDDDDDD8E8E8EA3A3A3C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8ACACAC82888B70B8D668A3BCD6D6D6D3D3D3DBDBDB9695
944C372B481F08481C04481C044B1E054E210852270E533D30A3A2A1DDDDDDDD
DDDDDDDDDDDDDDDD8B8B8BA7A7A7C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8B9B9B9A3A3A36E8B986EB4D289AFBFD4D4D4DDDDDD918F8E4928
16481C04481C044C2007987E6F76513B5B2D106031126233145E402CB1B1B1DE
DEDEDDDEDDDEDEDE868686AAAAAAC8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8B3B3B398989872AFC96AAFCCB0C1C8DBDBDBC4C3C44B3224481C
04481C044D200677533DFFFFFFD2C4BA6838176D3C1A703F1C72411D645549D6
D6D6E1E1E1E1E1E1888888ADADADC8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8ABABAB7E888B75BFDE6DA9C3DADADAE4E4E4898684481C05481C
044E210757290D623315A98C798B644775441F7A48227E4B24804D26784D2B9A
9A9AE4E4E4E4E4E48D8D8DAFAFAFC8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8B9B9B9A2A2A270909E74BCDB92BACCE5E5E5E7E7E763534A481C044D20
07572A0D6132136A3A19DACEC5AE8F77824E2787532A8B572C8D592E8E5A2E77
6C64E7E7E7E5E5E5919191B2B2B2C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8B2B2B297989878BBD872BAD9BFD3DBEBEBEBE5E5E550392D4A1E055527
0B6031126B3A1974431FEBE4DEEAE2DB976740945E329863359B65369C663773
5D4AE5E5E5DBDBDB959595B4B4B4C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8AAAAAA7C888D7CCAEC72B9D8DDE5E9EFEFEFE7E7E74C35285024095D2E
1068381773421E7E4C25A37B5BF7F4F1F3EEE9B0825AA56E3DA9713EAA723F74
5D49E6E7E7C6C6C6989898B6B6B6C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
B9B9B9A1A1A17298A87ECCED73BAD8E4EAEDF2F2F2F0EFF05C483D57290D6334
146F3F1B7B492387532A925D30B18762FFFFFFEEE3D8B37944B67D47B77E4783
7161EFEFEFB4B4B49C9C9CB9B9B9C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
B3B3B397989880CAEA7FCEF074BCDAE7EDF0F5F5F5F6F5F57D736E5C2E106939
1875441F824F27C2A68FA06E42B58860FFFFFFFCFBF9BF854CC4894FC18950A0
9C99F5F5F5AAAAAA9F9F9FBABABAC8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
B1B1B17F8C9284D5F881D0F275BDDDEAF0F3F9F9F9F9F9F9B8B8B75B351D6E3D
1B7A482288542AFEFEFEFFFFFFFFFFFFFFFFFFE8D0B9CB8F53D19557B4916EDC
DCDCF9F9F9999999A2A2A2C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
B6B6B68097A085D6F982D1F476BFDEEDF4F7FDFDFDFDFDFDF8F8F98078736C41
217F4C258C582DA87951C6A281D1AD8CD0A276CC9054D7995AD6A46FCFCCC9FD
FDFDFDFDFD939393A6A6A6C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8AFB0B08099A47BB4CD77BFDDEEF5F8FFFFFFFFFFFFFFFFFFF8F8F88D88
856E4C328E5A2E9C6637AA723FB87E47C58A4FD29658D4AB80DCD8D2FEFEFEFF
FFFFFFFFFF8B8B8BAAAAAAC8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8BBBBBBB1B1B18D9193EDEFF1FFFFFFFFFFFFFFFFFFFFFFFFFEFE
FEC5C5C57E756E755B45906D4DA27F5DAF9377C5BBB2E7E7E7FEFEFEFFFFFFFF
FFFFFFFFFF8A8A8AADADADC8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8ACACACF0F0F0FFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFEFEFEF0F0F0DCDCDCE0E0E0F4F4F4FEFEFEFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFF8F8F8FAFAFAFC8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8B3B3B3F0F0F0FFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFBFBFB949494B3B3B3C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8B8B8B8F1F1F1FFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFEEEEEEA0A0A0B9B9B9C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8E0E0E0FFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDFDFDFCFCFCFBFBFBF9
F9F9BBBBBBB1B1B1C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8B3B3B3A6A6A6A4A4A4A4A4A4A5A5A5A7A7
A7A8A8A8A9A9A9AAAAAAACACACADADADAFAFAFB0B0B0B0B0B0B1B1B1B2B2B2B4
B4B4B9B9B9C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8
C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8}
Caption = #1057#1087#1088#1072#1074#1082#1072
OnClick = N6Click
end
end
object XPManifest1: TXPManifest
Left = 328
Top = 8
end
end





Unit2.pas
unit Unit2;

interface

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

type
TForm2 = class(TForm)
Timer1: TTimer;
procedure FormCreate(Sender: TObject);
procedure Timer1Timer(Sender: TObject);
procedure FormClick(Sender: TObject);
procedure FormPaint(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form2: TForm2;
Bmap: TBitmap;

implementation

{$R *.dfm}

procedure TForm2.FormClick(Sender: TObject);
begin
Form2.Close;
end;

procedure TForm2.FormCreate(Sender: TObject);
begin
Brush.Style:=bsClear;
end;

procedure TForm2.Timer1Timer(Sender: TObject);
begin
Form2.Close;
end;



procedure TForm2.FormPaint(Sender: TObject);
begin
Bmap:=TBitmap.Create;
Bmap.LoadFromFile('Title.bmp');
Width:=Bmap.Width;
Height:=Bmap.Height;
Canvas.Brush.Bitmap:=Bmap;
Bmap.Transparent:=True;
Bmap.TransparentColor:=clWhite;
Canvas.Draw(0,0,Bmap);
Bmap.TransparentMode:=tmAuto;
end;

end.




Unit2.dfm
object Form2: TForm2
Left = 216
Top = 4
BorderIcons = []
BorderStyle = bsNone
Caption = 'TitleForm'
ClientHeight = 263
ClientWidth = 352
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnClick = FormClick
OnCreate = FormCreate
OnPaint = FormPaint
PixelsPerInch = 96
TextHeight = 13
object Timer1: TTimer
Interval = 11000
OnTimer = Timer1Timer
Left = 64
Top = 24
end
end


Опубликовал Kest December 01 2009 12:14:29 · 0 Комментариев · 9981 Прочтений · Для печати

• Не нашли ответ на свой вопрос? Тогда задайте вопрос в комментариях или на форуме! •


Комментарии
Нет комментариев.
Добавить комментарий
Имя:



smiley smiley smiley smiley smiley smiley smiley smiley smiley
Запретить смайлики в комментариях

Введите проверочный код:* =
Рейтинги
Рейтинг доступен только для пользователей.

Пожалуйста, залогиньтесь или зарегистрируйтесь для голосования.

Нет данных для оценки.
Гость
Имя

Пароль



Вы не зарегистрированны?
Нажмите здесь для регистрации.

Забыли пароль?
Запросите новый здесь.
Поделиться ссылкой
Фолловь меня в Твиттере! • Смотрите канал о путешествияхКак приготовить мидии в тайланде?
Загрузки
Новые загрузки
iChat v.7.0 Final...
iComm v.6.1 - выв...
Visual Studio 200...
CodeGear RAD Stud...
Шаблон для новост...

Случайные загрузки
Delphi 2005 Учимс...
Assistant
Программирование ...
AboutSystem
JBlabel3D
Assembler. Учебни...
Анимированное поя...
Delphi на примерах
LaserTank [Исходн...
Sztransppanel
Разработка интерн...
Crystal Button
Averaging [Исходн...
Blib [Исходник на...
CLR via C#
SUIPack
Керниган Б.В., Ри...
База игр
Приложение Клиент...
Flud Vkontakte.ru

Топ загрузок
Приложение Клие... 100774
Delphi 7 Enterp... 97828
Converter AMR<-... 20268
GPSS World Stud... 17014
Borland C++Buil... 14191
Borland Delphi ... 10290
Turbo Pascal fo... 7373
Калькулятор [Ис... 5981
Visual Studio 2... 5207
Microsoft SQL S... 3661
Случайные статьи
Задание: обзор чле...
5.4. Чтение файло...
Беспроводные средс...
Как добавить в Ata...
Исследование перет...
Почему не нужно бо...
using reversible р...
Внешняя сортировка...
Еще один замечател...
Соревнование за до...
ПРИЛОЖЕНИЕ 4. Блок...
Error In statement
Операции отношения...
Инициализация опер...
Успешная проверка
Стратегии и процес...
Операции над матри...
Двоичные файлы Web...
Скорость процессора
Операторы описания...
Стандартные процед...
Быстрые проверки
JET casino
Модуль Server-side...
Использование VLAN
Статистика



Друзья сайта
Программы, игры


Полезно
В какую объединенную сеть входит классовая сеть? Суммирование маршрутов Занимают ли таблицы память маршрутизатора?