Meine Drag'n'Drop-Funktion ergänzen

[AlexII]

Ok, aber ich verstehe nicht, wieso bekomme ich hier ne "nein" Meldung?

Delphi-Quellcode:

    showmessage(Extension);

    if Extension='.crp' then
    begin
    showmessage('ja');
    end else
        begin
        showmessage('nein');
        end;