- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
- 29
- 30
- 31
- 32
- 33
- 34
- 35
- 36
- 37
- 38
- 39
- 40
- 41
- 42
- 43
- 44
- 45
- 46
- 47
- 48
- 49
- 50
- 51
- 52
- 53
- 54
- 55
- 56
- 57
- 58
- 59
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if GetAsyncKeyState(81) <> 0 then
begin
timer1.Enabled:=false;
memo1.Text:=memo1.Text+'й ';
end;
begin
if GetAsyncKeyState(87) <> 0 then
begin
timer1.Enabled:=false;
memo1.Text:=memo1.Text+'ц ';
end;
...
begin
if GetAsyncKeyState(13) <> 0 then
begin
timer1.Enabled:=false;
memo1.Text:=memo1.Text+' ';
if memo1.Text <> ' ' then
button1.Click;
end;
if GetAsyncKeyState(32) <> 0 then
begin
timer1.Enabled:=false;
memo1.Text:=memo1.Text+' ';
end;
begin
if GetAsyncKeyState(1) <> 0 then
begin
timer1.Enabled:=false;
memo1.Text:=memo1.Text+' ';
if memo1.Text <> ' ' then
button1.Click;
end;
end;
end;
end;
end;
end;
end;
end;
end;
end;
end;
end;
end;
end;
end;
end;
end;
end;
...
end;
Видимо чувак копипастил вместе с begin от процедуры, а потом "исправил" ошибки об отсутствии end.
Kozel 15.05.2016 12:25 # +10
И да, зачем этот код был написан?
FrontlineReporter 15.05.2016 12:29 # +10
И конечно же на Дельфи 7.
guesto 17.05.2016 13:04 # +11
FrontlineReporter 17.05.2016 13:47 # +11
3_14dar 15.05.2016 21:31 # +10
Xom94ok 15.05.2016 21:51 # +21
1024-- 15.05.2016 22:18 # +16
Зависит ли это от его автора? Т. е., скажем, ненаписанный код программиста отформатирован, а непрограммиста - не отформатирован, и они, создавая код, просто очищают его, отсекая куски небытия как Микеланджело отсекал лишнее от камня. Или наоборот, работа программиста заключается в форматировании кода, который в ненаписанном состоянии не был отформатирован, а непрограммисту в свою очередь в силу везения достаётся отформатированный ненаписанный код, но он сбивает форматирование в процессе написания?
3_14dar 15.05.2016 22:35 # +7
Шта?
Xom94ok 15.05.2016 22:50 # +18
dxd 16.05.2016 11:01 # +9
guesto 16.05.2016 13:29 # +11
как там, в 2007м?
dxd 16.05.2016 21:57 # +10
3.14159265 16.05.2016 22:09 # +10
Так и сейчас всё та же. В/на
3_dar 16.05.2016 22:21 # +11
kerman 15.05.2016 23:36 # +12
1024-- 16.05.2016 05:44 # +15
3_dar 16.05.2016 22:22 # +9
3.14159265 16.05.2016 22:24 # +10
хочу спросить: а ненаписанный код, но некоторая в этот момент курит саму себя и уже собирается в саму себя и уже собирается выдохнуть.
это грибы видя такие стены текста моя рука тянется к ворециям. ну
если поджечь траву в будущем и заменить эту программисту в свою очередь привело бы к коллосальному скачку энергии, однако,
но за счёт движения молекулярная структуры одна трава будет тождественности
3_14dar 15.05.2016 22:35 # +9
kipar 15.05.2016 23:52 # +9
guesto 17.05.2016 13:05 # +9
подскажите, а что там еще новенького?
guest 13.12.2016 19:59 # 0
Dr_Stertor 13.12.2016 20:07 # −1
Ключевое слово 'begin' в большинстве паскалеподобных языков означает начало кода (инструкции).
bayan 13.12.2016 21:23 # 0
TOPT 13.12.2016 22:05 # −1
Dr_Stertor 13.12.2016 22:53 # 0