Overførelse af data fra modal forms

Kompileren bliver sur når jeg forsøger at oversætte medfølgende kode. Det jeg ønsker er at ved kald af OpretDisk' constructor overføres en pointer således data kan udveksles mellem dialog og main før dialog frigøres fra memory. Koden er tæt på en tro kopi af Delphi 6 side 6-11.


unit OpretDisk;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TdlgOpretdisk = class(TForm)
    lbComputerId: TStaticText;
    computerId: TEdit;
    bntOpret: TButton;
    bntAfslut: TButton;

  private
    PMyString: ^String;
  public
    constructor OpretDisk(p: Pointer; Owner: TComponent);
  end;

implementation


{$R *.dfm}

constructor OpretDisk(p: Pointer; Owner: TComponent);
begin

      PMyString := p;
      String(PMyString^) :='';
end;

end.

Mvh
Malm