Simba/Projects/MMLLib/libmml.lpr

library libmml;

{$mode objfpc}{$H+}

uses
  cmem,Classes,interfaces,graphics,client;

{$R *.res}

var
  C: TClient;
function test: pchar;
begin
  result := PChar('hello world');
end;

procedure init;
begin
  C:=TCLient.Create('');
end;

function getmousepos: tpoint;
begin
  C.IOManager.GetMousePos(result.x,result.y);
end;



exports
  test,
  init,
  getmousepos;


begin
end.