Miitchyy
2007-08-03 09:03:35
program Debug;
procedure Debug(What: Variant);
begin
Writeln(What);
end;
begin
Debug(19.29080);
Debug('19.29080');
Debug(19);
Debug(True);
Debug(Integer);
Debug(String);
Debug(Extended);
Debug(Cardinal);
Debug(TIntegerArray);
end.Integer, String, Extended, Cardinal and all other Types have numbers :O
I never knew that.
(The Debug procedure is something I made while I was bored)