[gelöst] Erhöhung mit INC() bei SpinEdit.Value

[catweasel]

Hallo

Ich habe eine SpinEdit-Komponente im Einsatz die ich automatisiert erhöhen möchte.

Wenn ich sie mit "Variable:=Variable+10" erhöhe, funktioniert das tadellos.

Code: Alles auswählen

PasswortlaengeSpinEdit.Value := PasswortlaengeSpinEdit.Value+10;

Mache ich das gleiche mit "inc(Variable, 10)" kommt es beim compilieren zu einer Fehlermeldung

Code: Alles auswählen

inc( PasswortlaengeSpinEdit.Value,10);

Fehlermeldung:

Code: Alles auswählen

unit11.pas(231,39) Error: Can't take the address of constant expressions

Geht das grundsätzlich nicht mit INC() in der Komponente?


Gruß
Michael

[theo]

Soviel ich weiß geht das nicht. Der Parameter ist ja keine einfache Zahl, sondern das Resultat einer Methode (Set/Get).

[catweasel]

Soviel ich weiß geht das nicht. Der Parameter ist ja keine einfache Zahl, sondern das Resultat einer Methode (Set/Get).

Müßte das dann nicht auch für

Code: Alles auswählen

PasswortlaengeSpinEdit.Value := PasswortlaengeSpinEdit.Value+10;

gelten? Das funktioniert ja.

[theo]

Soviel ich weiß geht das nicht. Der Parameter ist ja keine einfache Zahl, sondern das Resultat einer Methode (Set/Get).

Müßte das dann nicht auch für

Code: Alles auswählen

PasswortlaengeSpinEdit.Value := PasswortlaengeSpinEdit.Value+10;

gelten? Das funktioniert ja.

Das ist was anderes: Lies den Wert -> Addiere 10 -> Schreib den Wert. Ein Getter kann nicht gleichzeitig ein Setter sein.

[Mathias]

Soviel ich weiß geht das nicht. Der Parameter ist ja keine einfache Zahl, sondern das Resultat einer Methode (Set/Get).

Das dies nicht geht, müsste man auf die Assembler-Ebene gucken gehen.

Dieser Code inkrementiert ein einfache Variable um 1, die Ein- und Aus-gabe ist in beiden Fällen i.
Aber ber der property-Variable kommt die Eingabe von der Funktion von Getxxx und die Ausgabe geht in Setxxx.

Code: Alles auswählen

var
  i: Int16;
begin
  i := 1;
  asm
           Inc     i
  end;
  ShowMessage(IntToStr(i));

Wen du i im Asm-Block durch eine Property ersetzt, kommt es auch zu einem Fehler.

Oder bei addieren um 10, sieht das in Assembler so aus:

Code: Alles auswählen

  asm
           Add     i, 10
  end;  

[catweasel]

ok, ich denke jetzt hab´ ich es verstanden.
Danke für die Info

Gruß
Michael