Como usar guilhotina de impressora termica?

Pessoal,
tenho de fazer um programa q imprima um texto e no final , mande a impressora cortar o papel(usando a guilhotina da impressora).

O problema é q não sei como mandar um comando para ela cortar o papel! Será q alguem sabe?

A impressora q tenho aki para testar é uma Olivetti PRT 100, é uma impressora termica. E para imprimir, envio o texto para a porta LPT1.


Exemplo de como mando imprimir:

procedure TForm1.Button1Click(Sender: TObject);
var
F : TextFile;
begin
AssignFile(F, ´LPT1´);
Rewrite(F);

WritelnF,´===============================´);
Writeln(F,Memo1.Text);
Writeln(F,´===============================´);
Writeln(F,´´);

CloseFile(F);
end;

Desde já agradeço.