Advanced Search

Posted By

zooms on 08/10/10

Tagged

Versions (?)

Last Edited at 08/10/10 04:22pm

Statistics

Viewed 94 times
Favorited by 0 user(s)

Related snippets

1157
HTML color to Delphi TColor

在delphi中显示变量类型

/ Published in: Delphi
Save to your folder(s)

Expand | Embed | Plain Text

Copy this code and paste it in your HTML 
  1. procedure TForm1.Button4Click(Sender: TObject);
  2. var
  3.   I: Integer;
  4.   S: String;
  5.   W: Word;
  6.   B: Boolean;
  7.   D: Double;
  8. begin
  9.   ShowMessage(VarTypeAsText(VarType(I)));
  10.   ShowMessage(VarTypeAsText(VarType(S)));
  11.   ShowMessage(VarTypeAsText(VarType(W)));
  12.   ShowMessage(VarTypeAsText(VarType(B)));
  13.   ShowMessage(VarTypeAsText(VarType(D)));
  14. end;

Report this snippet


Comments

RSS Icon Subscribe to comments

You need to login to post a comment.