GuidToString (Delphi)

From RAD Studio Code Examples
Jump to: navigation, search

Description

The following example manufactures a GUID and displays it in a dialog box after translating it to a string.

Code

uses ActiveX, ComObj;
procedure TForm1.Button1Click(Sender: TObject);
var
  G: TGUID;
begin
  OleCheck(CoCreateGuid(G));
  ShowMessage(SysUtils.GUIDToString(G));
end;

Uses