Hola amigo gracias por contestar , no se nada de punteros esto es algo valido
Código Delphi
[-]var P: PByte; begin P:= PByte(lpData); for i:= 1 to dwBytesRecorded do begin Canvas.LineTo(0,P^); Edit1.Text := IntToStr(p^); inc(P); end; end;
esto es solo un trozo de codigo , me interesa saver esta linea Edit1.Text := IntToStr(p^);