Test

Delphi code posted by Drarok
created at 23 Sep 17:18

Edit | Back 
1
2
3
4
5
6
7
 
Function Test(Engineer : Integer) : Currency;
Var
  SQL : String;
Begin
  SQL := Format('SELECT * FROM engineers WHERE id=%d', [Engineer]);
  Result := 1.50;
End;
168 Bytes in 2 ms with coderay