delphi中是这样的type
  myTag = record
    cbSize : longint;
    hwnd : longint;
    uID : longint;
    uFlags : longint;
    uCallbackMessage : longint;
    hIcon : longint;
    //这个类型在VB中不知道算什么意思,我对VB不熟
  end;

解决方案 »

  1.   

    也没用过VB,szTip as String * pnTOOLTIP_SZ 这个东西很奇怪,难道这么一定义,它就可以自己算出字串的字节数?这样的话可能就要用一个类来实现这个类型了。
      

  2.   

    //定义于interface中即可,如下。
    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; 
      ...
      

  3.   

    我按照你们的代码这样写的。
    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.
    请问这是为什么啊???
      

  4.   

    type
      TontifyIconData = record
        cbSize : longint;
        hwnd : longint;
        uID : longint;
        uFlags : longint;
        uCallbackMessage : longint;
        hIcon : longint;
        szTip : wstring[pnTOOLTIP_SZ];
      end;
      TForm1 = class(TForm)