JXJ, muchacho, ¡que se ha ofuscado el navegador! Ponle en orden que no te maneja bien las etiquetas [delphi].
Respecto a lo que preguntas de "cómo saber si es true" y tal, tienes varias formas, pero la más guay es esta:
Código Delphi
[-]FUNCTION DisplayMsg (s: STRING) :BOOLEAN; STDCALL;
BEGIN
ShowMessage (s);
RESULT := s <> ''
END;
Como ves, lo que hago es comparar la cadena y devolver el resultado de la comparación. Es equivalente a:
Código Delphi
[-]FUNCTION DisplayMsg (s: STRING) :BOOLEAN; STDCALL;
BEGIN
ShowMessage (s);
IF s <> '' THEN
RESULT := TRUE
ELSE
RESULT := FALSE
END;
Lo demás ya no lo entiendo.