mh
Nach langem probieren neu schreiben usw.
hab ich jetzt lediglich im Constructor mal was gesetzt, jetzt funct es!
Delphi-Quellcode:
if fOrientation = sHorizontal then
fSecondPos:= ((Width - fBorderSize) * fBarSecondPos) div fMax
else
fSecondPos:= ((Height - fBorderSize) * fBarSecondPos) div fMax;
if fOrientation = sHorizontal then
fFirstPos:= (((Width - fBorderSize) * fBarFirstPos) div fMax)
else
fFirstPos:= (((Height - fBorderSize) * fBarFirstPos) div fMax);
if fOrientation = sHorizontal then
fHsavePos:= ((Width - fBorderSize) * fSavePos) div fMax
else
fHsavePos:= ((Height - fBorderSize) * fSavePos) div fMax;
if fOrientation = sHorizontal then
fHPeakPos:= (((Width - fBorderSize) * fPeakPos) div fMax)
else
fHPeakPos:= (((Height - fBorderSize) * fPeakPos) div fMax);
vermute, die Variablen müssen definiert sein!
THX
Gruß alfold