InputBox i DLL

Witam

Pytanie 1
Mam sobie taką dllkę:

library LoczeksDLL ;

function CutExt(FileName : String) : String ; stdcall ;
var
  i : Integer ;
begin
  Result := '' ;
  for i := 1 to Length(FileName) do
    if FileName[i] <> '.' then Result := Result + FileName[i]
    else Break ;
end ;

exports
  // eksportujemy procedurkę
  CutExt name 'CutExt' ;

begin
end.

Kompiluje ją, powstaje mi plik .dll, wrzucam go do katalogu z innym moim progsem, a w implementation daje coś takiego:

function CutExt(FileName : String) : String ; stdcall external 'LoczeksDLL.dll' name 'CutExt' ;

Po starcie wszystko chodzi dobrze, ale jak zamkne swój program, to mi błąd wywala...i czemu ? :-)

Pytanie 2.
Zastanawiam się jak sprawdzić, jak zostało zamknięte okno dialogowe InputBox i zarazem otrzymać tekst wpisany przez użytkownika. To tyle :-)

Pomoże ktoś ? :-)

[dopisane]
Dzięki my_nick :)

użyj typu PChar zamiast string....