Copy,Pos Problem

[Gollum]

Hallo,

Zitat:

dec(rpos);

bedeutet, das die Zählvariable um einen Wert vermindert wird. Das gleiche kannst Du auch mit rpos:=rpos-1 erreichen.

Wenn Du nur die Dateiendung haben willst, kannst Du auch auf Delphi-Bordmittel zurückgreifen.

Mit

Code:

  if (ExtractFileExt(OpenDialog1.FileName)='.bmp') then

erhälst Du das gewünschte. Näheres zur Funktion "ExtractFileExt" findest Du in der Delphi-Hilfe.

Ach ja, noch in der Uses-Klauses die Unit "SysUtils" aufnehmen.