Mikä tässä koodissa vialla?

Siellä on s-merkki puolipisteen jälkeen.

IDE:n pitäisi näyttää tuollaiset helpot asiat punakynällä reaaliajassa.

Voisi olla tehokkaampaa käyttää esim. seuraavaa kirjastoa:
https://github.com/ddablib/md5
-toisaalta jos laskettavia summia ei ole kovin paljon n. 10x menetys nopeudessa tuskin haittaa - tuo fpSystem-kutsu kun luo joka kerta uuden prosessin, mikä on melko hidasta. Ellen väärin muista, prosessiin avataan myös shell, joka vasta suorittaa annetun komennon. Itse md5-summan laskenta menee sen sijaan sekä ohjelmalla että kirjastolla yhtä sutjakkaasti.

Mulla kanssa ongelma. Ensin se lähdekoodi:
-------------------------
unit md5summer2;

{$mode objfpc}{$H+}

interface

uses
Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls, Unix;

var
tiedostot : ansistring;

implementation

type

{ TForm1 }

TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
Button3: TButton;
Button4: TButton;
ListBox1: TListBox;
OpenDialog1: TOpenDialog;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
private

public

end;

var
Form1: TForm1;

begin

{$R *.lfm}

{ TForm1 }

procedure TForm1.Button1Click(Sender: TObject);
begin
OpenDialog1.Execute
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
Close
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
fpSystem("md5sum -b " + tiedostot + " >>md5sums.md5")
end;

end.
--------------------------------

Sitten kääntäjän (FreePascal) virheilmoitukset:

Käännä projekti, Kohde: md5summer: Lopetuskoodi 1, Virheet: 2
md5summer2.pas(44,1) Error: Illegal expression
md5summer2.pas(44,11) Fatal: Syntax error, ";" expected but "identifier TFORM1" found

--

Eli mikä tuossa on väärin ja mitä pitäisi muuttaa jotta tuo toimisi, koko sovellus on vielä alkutekijöissään mutta kokeilin ajaa tuota testimielessä ja sain nuo virheilmoitukset.