What was (s)he thinking?
© Copyright Frank D. Kanu 2000-2008
Function BoolTostr(Bool:boolean):string;
begin
try
if Bool then result:='TRUE' Else Result:='FALSE';
except
On E:Exception do Result:='Error!!';
end;// of try
end;Tags:
Technorati (All Links are external): code review
This blog-entry is protected by a digital fingerprint:785273ed81985582c8a1be62f78c9459
