Einzelnen Beitrag anzeigen

th_bone

Registriert seit: 16. Jun 2004
172 Beiträge
 
Delphi 2005 Professional
 
#1

Sendmessage pointer of array

  Alt 30. Nov 2005, 13:13
Hi,

eine kurze frage ich will mit sendmessage einen pointer auf ein array versenden

Delphi-Quellcode:
 type
  Mymessage = record
    msgtext: String[20];
    msgint : integer;
  end;

 //....

 var
  mymsg: mymessage;

 //....

procedure TForm1.FormCreate(Sender: TObject);
begin
  mymsg.msgtext:='test';
  mymsg.msgint:=1234;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  SendMessage(HWND_BROADCAST, WM_OURMESSAGE, Handle, integer(@mymsg));
end;
aber wie bekomme ich den jetzt wieder zugriff auf die arraystruktur ?

bei einem string funktiniert es ja ala

text := string(pchar((pointer(Msg.Info)))); aber wie greife ich auf einen wert im array zu ?

Danke

Ralf
  Mit Zitat antworten Zitat