serielle schnittstelle Ich versteh nur bahnhof

[snow]

So hab jetzt alles so gemacht wie es sein sollte doch........

Delphi-Quellcode:

unit test;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, SynaSer,
  Buttons;

type

  { TForm1 }

  TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    Button3: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { private declarations }
  public
    { public declarations }
  end; 

var
  Form1: TForm1; 

implementation

{ TForm1 }

procedure TForm1.Button1Click(Sender: TObject);
begin
ser:=TBlockserial.Create;
  try
    ser.Connect('COM1');
    ser.Config(2400,8,'N',0,false,false);
    ser.SendString(IntToStr(14)+';'+IntToStr(06)+';')
  finally
    ser.Free;
  end;

end;

initialization
  {$I test.lrs}

end.

Zitat:

test.pas(35,1) Error: Identifier not found "ser"
test.pas(37,5) Error: Identifier not found "ser"
test.pas(37,16) Error: Illegal expression
test.pas(37,16) Fatal: Syntax error, "EXCEPT" expected but "(" found

schon wieder ein fehler. wie soll ich den diesmal beheben?