Delphi Unit für Serielle Schnittstelle initialisieren

kein pc wissen

Cadet 4th Year
Registriert
Feb. 2008
Beiträge
90
Hallo,

Ich möchte in Delphi 7 die serielle Schnittstelle auslesen, da dort ein Mikrokontroller angeschlossen wird. Nach einiger suche bin ich auf diese Unit gestoßen:

http://www.delphipraxis.net/topic136188_tserial+rs232+ansprechen.html

Das Problem was ich habe ist eigentlich ziemlich einfach:

Wie initialisiere ich diese Unit?

Ich komme bis zu diesem Punkt: variablenname .create()
aber was in die Klammer kommt, weiß ich nicht. Bei dem MiniLab von Meilhaus weiß ich, dass dort eine Zahl steht, aber ich habe in dieser Unit nichts gefunden, was mir hilft. Auch die Suchmaschine mit dem G hat mir nicht geholfen.

Soweit bin ich:
Code:
unit Unit1;

interface

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

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;
  test:Tcom;
implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  test:=tcom.Create();
end;

end.

Wie gesagt,nur Initialisierung.

Ich freue mich auf Antworten
 
Ganz einfach: self

test := tcom.Create(self);

Laut Unit wird eine Owner-Komponente verlangt, also die "Mutterkomponente". Das kann praktisch jede sein. Das TForm1 z.B., aber ich nutze immer den self-Befehl. Denn das klappt unabhängig vom verwendeten Programm.
 
Zuletzt bearbeitet:
Du rufst den Constructor der Klasse TCom auf.

Der Constructor ist laut deinem Verweis folgendermaßen definiert:

...
public
constructor Create(AOwner: TComponent); override;
...

Daraus ersiehst Du, das Du einen Owner (AOwner) übergeben musst.

Du kannst es an dieser Stelle mit Self oder Nil versuchen. Letzten Endes
musst Du einen Owner übergeben, der vom Typ TComponent (oder abgeleitet) ist.
 
Zurück
Oben