Zitat von
Grolle:
Ja bei den If Anweisungen hast du natürlich Recht
Aber auch nach Änderung schmeißt er alles in die SynEdits
in die die Files nicht rein sollen.
Hi,
vermutlich hast Du direkt hinter jedem THEN das Semikolon stehen lassen. Das heißt, dass bei erfüllter IF-Bedingung nix passiert. Der anschließende Code ist unabhängig von der IF-Bedingung.
Delphi-Quellcode:
If Bedingung=True Then // Hier KEIN Semikolon!
Begin
MachWas();
MachWer();
End;
Zitat:
ob das mit
geht, weiß ich nicht,dazu enthalte ich mich.
Nein, das geht nicht. Das würde nämlich bedeuten, dass die Endung der Datei GENAU '.htm; .html' heißen muss. Du musst jede einzelne Endung prüfen:
IF (LowerCase(Endung)='.htm') OR (LowerCase(Endung)='.html') THEN ...
Gruß
Stephan
Stephan B.
Wer andern eine Grube gräbt ist Bauarbeiter!
Wer im Glashaus sitzt, sollte sich lieber im Dunkeln ausziehen!
Außerdem dieser Satz kein Verb...