Von Com-Port zum WinAmp-Player

[Islay]

So, ich nähere mich dem Com-Port, habe aber fast nur Misserfolge

Kann mir einer sagen warum ich immer ein "undefinierter Bezeichner" zurückgeworfen bekomme?

Über try and error komm ich langsam nicht mehr weiter...

Gruß Denis

Delphi-Quellcode:

unit rs232;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  SerialNG, StdCtrls;

type
  TForm1 = class(TForm)
    SerialPortNG1: TSerialPortNG;
    Label1: TLabel;
    procedure Button1Click(Sender: TObject);
    procedure Label2Click(Sender: TObject);
    procedure machwas2(port: TSerialPortNG);

  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure machwas;    
var
  port: TSerialPortNG;    
begin
  // schnittstelle aufmachen
  port := TSerialPortNG.Create(nil);  // objekt kerstellen
  try    
    port.CommPort := 'COM1';  // comport einstellen
    port.BaudRate := 9600;  // baud-rate einstellen
    port.Active := true;  // schnittstelle öffnen

    if 1 = 1 then machwas2(port: TSerialPortNG);

  finally
    // schnittstelle zumachen
    port.Active := false;    
    freeandnil(port);
  end;
end;

 procedure machwas2(port: TSerialPortNG);
var
  text: String;
begin
  text := 'Hallo';
  port.SendString(text + #11);

end;



end.