06. februar 2002 - 09:08
Der er
7 kommentarer og 1 løsning
Pointer
Hej .. Jeg har følgende procedure som kaldes når der udføres en skrivning til et Can bus system. procedure TForm1.CanChanWrite(Sender: TObject; id: Integer; msg: Pointer; dlc, flag: Integer); De data der sendes ligger i 'msg' og antallet af data ligger i 'dlc'. Mit spørgsmål er hvordan jeg kan udskrive de data der ligger i 'msg'på skærmen i en memobox eller noget andet. Cadamsen
Annonceindlæg fra Kingston Technology
06. februar 2002 - 09:30
#1
Du kan bruge Move til at flytte dine data over i en string evt. VAR MyString : String; begin SetLength(MyString,dlc+1); Move(msg^,MyString[1],dlc); end; Noget i denne stil, har ikke lige delphi ved hånden så det er ikke checket
06. februar 2002 - 09:39
#2
Hej Martinlind. Det var ikke helt det jeg ville. msg pointer indeholder et antal data bytes, det jeg gerne vil er at se hvade de forskellige data bytes indeholder. Cadamsen
06. februar 2002 - 09:48
#3
Du kan oprette en type af samme format som det msg peger på, f.eks: Type DataRec = Record a: String; b: Real; end; Var Data: array[1..50] of DataRec; og bruge Data := msg^; for i := 1 to dlc do memo1.add(Data[i].a);
06. februar 2002 - 09:59
#5
Hej Martinlind. Jeg har arbejde lidt med Move funktionen, og nu virker det, så skriver du et svar, godkender jeg det. Cadamsen