Meine Drag'n'Drop-Funktion ergänzen

[daywalker9]

Schon mal gedebuggt?

[AlexII]

Zitat von daywalker9:

Schon mal gedebuggt?

Ne, hab mal versucht, aber blicke da nicht durch, keine Ahnung wie es geht.

[DeddyH]

Setz einen Haltepunkt und steppe mit F8 durch, bis es knallt. Dann hast Du zumindest schonmal die fehlerverursachende Zeile.

[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?

[daywalker9]

Was kommt den bei

Delphi-Quellcode:

showmessage(ExtractFileExt(Buffer));

raus?

[AlexII]

.crp also das was ich brauche...

[DeddyH]

Steht da evtl. noch ein Leerzeichen dahinter oder so? BTW: Du untersuchst immer nur die letzte Datei aus der "Drop-Liste", das ist Dir hoffentlich bewusst.

[AlexII]

Zitat von DeddyH:

Steht da evtl. noch ein Leerzeichen dahinter oder so? BTW: Du untersuchst immer nur die letzte Datei aus der "Drop-Liste", das ist Dir hoffentlich bewusst.

Ne da gibt's keine Leerzeichen...

Zitat:

BTW: Du untersuchst immer nur die letzte Datei aus der "Drop-Liste", das ist Dir hoffentlich bewusst.

Was meinst du damit?

[DeddyH]

Ich meine damit, dass man ja durchaus mehrere Dateien in einem Rutsch Drag&Droppen kann.

[AlexII]

Zitat von DeddyH:

Ich meine damit, dass man ja durchaus mehrere Dateien in einem Rutsch Drag&Droppen kann.

Kann man das irgendwie verbieten?