Forum: Programmieren allgemein
Delphi
by sx2008,
15. Aug 2010
Dieser Code tut meinen Augen weh:
wideshowmessage(ExtractFileExt(Buffer));
if WideSameText(Trim(ExtractFileExt(Buffer)), '.crpu') or WideSameText(Trim(ExtractFileExt(Buffer)), '.crp') or WideSameText(Trim(ExtractFileExt(Buffer)), '.ccr') then
Vielleicht sollte man hier eine Zwischenvariable verwenden!
Forum: Programmieren allgemein
Delphi
by sx2008,
4. Aug 2010
Du hast die Lösung doch schon gefunden - AnsiSameText.
Deinen Dateinamen können chinesisch, türkisch oder was auch immer sein,
aber die Endung muss ".TXT", ".Txt" oder ".txt" lauten.
Also ist AnsiSameText hier vollkommen ausreichend.