delphi中是这样的type
myTag = record
cbSize : longint;
hwnd : longint;
uID : longint;
uFlags : longint;
uCallbackMessage : longint;
hIcon : longint;
//这个类型在VB中不知道算什么意思,我对VB不熟
end;
myTag = record
cbSize : longint;
hwnd : longint;
uID : longint;
uFlags : longint;
uCallbackMessage : longint;
hIcon : longint;
//这个类型在VB中不知道算什么意思,我对VB不熟
end;
unit Main;interfaceuses
...type
TontifyIconData = record
cbSize : longint;
hwnd : longint;
uID : longint;
uFlags : longint;
uCallbackMessage : longint;
hIcon : longint;
szTip : array[1..pnTOOLTIP_SZ] of char;
end;
...
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
TontifyIconData = record
cbSize : longint;
hwnd : longint;
uID : longint;
uFlags : longint;
uCallbackMessage : longint;
hIcon : longint;
szTip : array[1..pnTOOLTIP_SZ] of char;
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
end.但是我运行时说是:Expected ':' but '=' found.
请问这是为什么啊???
TontifyIconData = record
cbSize : longint;
hwnd : longint;
uID : longint;
uFlags : longint;
uCallbackMessage : longint;
hIcon : longint;
szTip : wstring[pnTOOLTIP_SZ];
end;
TForm1 = class(TForm)