Einzelnen Beitrag anzeigen

btbe

Registriert seit: 15. Okt 2004
20 Beiträge
 
#7

Re: daten von gps-maus über Com-Port auslesen

  Alt 10. Nov 2004, 20:53
@hOnkibOnk: PC: 800Mhz Duron
256MB DDR Ram
2GB CompactFlash Karte als bootplatte (wegen stößen, etc.)
externe Platte 80GB (wird angeschlossen falls benötigt für mp3s etc.)
Haicom HI-202E GPS-Maus
GeForce4 MX440
am tv out 7" TFT
zu weihnachten kommt n touchscreen rein deshalb progge ich auch die oberfläche (windows ist nich grad Fingerfreundlich!)
PC is im Kofferraum in nem selbstgebauten Gehäuse
Geplant ist langfristig noch ne relaissteuerung über den pc für endstufe, etc. und eine verbindung zwischen pc und boardcomputer via obd-II Schnittstelle.... aber das is noch zukunftsmusik....
Wenn ihr bilder von euren systemen habt, schickt mir doch mal ein paar so als anregungen (webmaster@btbe-design.de), wer interesse hat dem kann ich auch bilder schicken! Ich hab mal ein Bild von der Software angehängt, soweit wie sie jetzt ist. Wer interesse hat dem kann ich sobald ich mit der gpsintegration ferig bin das programm schicken!

So aber um mal zum thema zurückzukommen:

Hab jetzt mal async pro installiert und habe es geschafft mithilfe eines codes den ich hier im Forum gefunden hab die einzelnen chars auszugeben. Hier der Code:

Delphi-Quellcode:
unit Unit1;

interface

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

type
  TForm1 = class(TForm)
    Memo1: TMemo;
    ComPort: TApdComPort;
    Label1: TLabel;
    Button1: TButton;
    procedure ComPortTriggerAvail(CP: TObject; Count: Word);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
  Data: String;
  I: Integer;

implementation

{$R *.dfm}

procedure TForm1.ComPortTriggerAvail(CP: TObject; Count: Word);
begin
  { OnTriggerAvail; Read the data }
  for I:= 0 to Count -1 do
     Data := ComPort.GetChar;
Label1.Caption := Label1.Caption + Data;
end;



end.
Jetzt müssen diese in arrays geschrieben werden (pro zeile 1 array) z.B. GPGGA[1] = 173722.000, GPGGA[2] = 5004.8731, GPGGA[3] = N,...... Gebraucht werden die zeilen GPGGA, GPGSA und GPRMC und dann kommt das ganze wieder neu vom gps und nun soll wieder von vorne angefangen werden und die alten werte überschrieben werden...
Hat da jemand ne saubere Lösung?
Miniaturansicht angehängter Grafiken
interface.jpg  
  Mit Zitat antworten Zitat