witam...mam problem z zapisem tej oto funkcji

elo....mam spr...wiesz moze jak poprawnie zapisac ta funkcje??

function TForm1.FormCreate(x: real): real;
begin
if x<=42 then
  result:= (cos(2*x*x)-11;
  else
   result:= (x+2)/(abs(x*x*x-8)) *ln(x) ;
end;

o to chodzi ze w tym meijscu

result:= (cos(2xx)-11

wyswietla mi sie blad: [Error] Unit1.pas(29): ')' expected but ';' found

i jak dodaje srednik za 11 lub i nie to i tak mam error

a druga rzecz jak najprosciej umiescic ja w bibliotece?

jednak problem thx adams85 juz rozwiazany:p

teraz potrzebuje jakies informacji jak to wladowac do biblioteki;/

Wyszukiwarki Ci chyba nie zbanowali:
Biblioteki DLL

czytalem i nadal nie wiem jak to wpakowac do bibliotki...

function TForm1.FormCreate(x: real): real;
begin
if x<=42 then
  result:= cos(2*x*x)-11
  else
   result:= (x+2)/(abs(x*x*x-8)) *ln(x) ;
end;

funkcie tam za bardzo nie sa wyjasnione

Samą funkcję czy z Form1? Jak tylko funkcję to tak:

library Project1;

{ Important note about DLL memory management: ShareMem must be the
  ...
  using PChar or ShortString parameters. }

uses
  SysUtils,
  Classes;

{$R *.res}

function JakasNazwa(x: real): real;
begin
if x<=42 then
  result:= cos(2*x*x)-11
  else
   result:= (x+2)/(abs(x*x*x-8)) *ln(x) ;
end;

exports
   JakasNazwa;

begin
end.

dzieki wielkie