- 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
procedure TRashetDate_Form.Button1Click(Sender: TObject);
var a, b, c, d, e, f, g, h, i, j, k, l, m, n, o, p, aa, ee: real;
res1: real;
res2: real;
res3: real;
res4: real;
res5: real;
res6: real;
res7: real;
res8: real;
res9: real;
res10: real;
res11: real;
res12: real;
res13: real;
res14: real;
res15: real;
res16: real;
res17: real;
res18: real;
res19: real;
res20: real;
res21: real;
res22: real;
res23: real;
Field: real;
<...>
Брал отсюда и рыдал...
http://www.cyberforum.ru/delphi-beginners/thread527956.html#post2835591
SmackMyBitchUp 26.03.2012 22:16 # +4
someone 27.03.2012 08:15 # +1
Kak vsyo zapuscheno...
guest 27.03.2012 15:45 # 0
guest8 09.04.2019 12:55 # −999