an der stelle, wo die meldungen ausgegeben werden, schriebst du einfach soetwas:
Delphi-Quellcode:
{...}
var
error: boolean;
{...}
if not error then
begin
showmessage('fehler');
error := true;
end;
das heißt: wenn die meldung einmal ausgegeben wurde, ist error = true. und wenn error = true, dann wird die nächste meldung nicht mehr ausgegeben
Aenogym