Entwickler-Ecke

Sonstiges (Delphi) - Fehlermeldung Operator auf ordnertyp nicht anwendbar


ScreaM - Di 25.10.05 20:38
Titel: Fehlermeldung Operator auf ordnertyp nicht anwendbar
Nabend zusammen,
also bin noch ein Anfänger in Delphi und hab da mal ein Problem.
Mein Projekt ist eine Kreuzung mit Ampelschaltung und abbiegenden fahrrädern zu machen.
Damit mein rad2 rechts abbiegt, an der rotenampel jedoch hält hab ich folgendes geschrieben(left=224 ist direkt vor der Ampel):

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
if (ampelgruen.visible=false) and (rad2.Visible=true)
    then if rad2.left=224
         then rad2.Left:=224
         else
    If rad2.Left<=320
        then rad2.Left:=rad2.Left+2
        else rad2.Top:=rad2.Top+2;


soo jetzt kommt aber der fehler:
[Fehler] mampel.pas(305): Operator ist auf diesen Operandentyp nicht anwendbar
es geht um die letzde zeile

danke schonmal für eure Hilfe

MfG
ScreaM

Moderiert von user profile iconGausi: Delphi-Tags hinzugefügt.


Gausi - Di 25.10.05 20:45

Bei welcher Zeile meckert er denn genau?


ScreaM - Di 25.10.05 20:51

bei der letzden zeile "else rad2.Top:=rad2.Top+2;"


Tilman - Di 25.10.05 21:03

Kann nicht sein poste mal mehr text, vielleicht hast du ne klammer oder nen >;< vergessen. Dein code funktioniert bei mir (mit zwei Labeln als rad und einem shape als ampelgruen)


ScreaM - Di 25.10.05 21:07

Das ist der komplette von diesem timer


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
procedure TForm1.timer1Timer(Sender: TObject);
begin

if (ampelgruen.visible=false) and (rad2.Visible=true)
    then if rad2.left=224
         then rad2.Left:=224
         else
    If rad2.Left<=320
        then rad2.Left:=rad2.Left+2
        else rad2.Top:=rad2.Top+2;

If Rad2.top=616
   then begin rad2.Visible:=false;
              rad2.Top:=376;
              rad2.Left:=0;
              Auto1.Visible:=true; end;

end;



das auto1 hinterher visible gemacht wird ist ne andere geschichte das is dann damit rad2 erstmal unsichtbar auf seiner "startposition" wartet und auto1 fahren lässt.

Moderiert von user profile iconraziel: Delphi-Tags hinzugefügt.


ScreaM - Di 25.10.05 21:21

problem wurde gelöst, danke für eure hilfe


Alstar - Di 25.10.05 22:07

Und woran lags?

Alstar


Tilman - Di 25.10.05 22:11

user profile iconAlstar hat folgendes geschrieben:
Und woran lags?

Alstar


jedenfalls wohl nicht an dem angegebenen quelltext - der läuft nach wie vor :)