campo obrigatorio em TurboInput1

Prezados Colegas,

Em primeiro lugar, agradeco a atencao de vcs. Estou com a seguinte duvida:
Estou usando delphi 6 com os componentes turbo html.Preciso fazer um campo obrigatorio em que, se a pessoa nao escrever nada no TurboInput1 apareca uma mensagem de erro. Ja tentei usar a seguinte logica mas nao deu certo...

procedure TFrmprincipal.Button1Click(Sender: TObject);
begin
showmessage(TurboInput1.Caption);
if TurboInput1.Caption = ´´ then
begin
showmessage(´em banco´);
abort;
end
else
begin
showmessage(´<>´);
TurboHtmlGenerator1.PublishFile(ExtractFilePath(application.ExeName)+´temp.html´);
TurboHtmlGenerator1.OpenFile(ExtractFilePath(application.ExeName)+´temp.html´);
end;
end;

Obrigada pela atencao e aguardo respostas.

att,

Lia