delphi const的用法

Posted 2020-07-07 lypzxy

unit RadKeygen;

interface
uses Classes,SysUtils,Windows;

  function fun1():string;
 

implementation

const
  iid:Integer=53;
  CSIDL_PERSONAL = $0005;
  byte1:array[0..255] of Byte=($00);
  SHFolderDll = ‘SHFolder.dll‘;


function fun1():string;

begin

end;