- 1
- 2
- 3
- 4
- 5
- 6
- 7
for i := 1 to X do begin
tblitem.FindKey([tbltranitemno.text]);
tblitem.GotoKey;
button3.Click;
edit3.Text := floattostr(org-i);
x := 1-1;
end;
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+109.8
for i := 1 to X do begin
tblitem.FindKey([tbltranitemno.text]);
tblitem.GotoKey;
button3.Click;
edit3.Text := floattostr(org-i);
x := 1-1;
end;
(c) India
хочется взять и уеб...
bildja 30.01.2010 01:28 # 0
guest 30.01.2010 08:54 # +3.4
TarasB 30.01.2010 20:34 # 0
nolka4 01.02.2010 07:23 # −1
guest 31.01.2010 15:49 # −6
dmtr76 31.01.2010 19:02 # +1
nolka4 01.02.2010 07:23 # +0.8
guest 05.03.2010 01:10 # −1.4
guest 31.05.2010 21:35 # 0
Amok 09.02.2010 12:51 # 0
if (true)
{
//куча кода
}
else
{
//еще одна куча кода
}
guest 31.05.2010 21:26 # 0