Meine Drag'n'Drop-Funktion ergänzen

[AlexII]

Also das Problem liegt irgendwo hier:

Delphi-Quellcode:

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

Ich lade eine .crp Datei bekomme aber "nein" Meldung, wieso das denn?