Die Suche ergab 4 Treffer

Zur erweiterten Suche

von NiNanny
So 10. Mär 2013, 18:45
Forum: Einsteigerfragen
Thema: Ampelsystem
Antworten: 8
Zugriffe: 3155

Re: Ampelsystem

Danke, es funktioniert jetzt.
von NiNanny
So 10. Mär 2013, 16:01
Forum: Einsteigerfragen
Thema: Ampelsystem
Antworten: 8
Zugriffe: 3155

Re: Ampelsystem

Da passiert nichts und ich weiß nicht wie man das anders macht. Ist aber egal ich versuch es anders.
von NiNanny
So 10. Mär 2013, 13:02
Forum: Einsteigerfragen
Thema: Ampelsystem
Antworten: 8
Zugriffe: 3155

Re: Ampelsystem

Code: Alles auswählen

procedure TfmKreuzung.Timer1Timer(Sender: TObject);
begin
  if(122=1) and (ImAb.left<600) then
  begin
    ImAb.left:=ImAb.left+1;
  end;
end;
 
procedure TfmKreuzung.btStartClick(Sender: TObject);
begin
  timer1.enabled:=true;
end;
 
end.
Da passiert nichts! :(
Was mach ich falsch?
von NiNanny
Sa 9. Mär 2013, 17:11
Forum: Einsteigerfragen
Thema: Ampelsystem
Antworten: 8
Zugriffe: 3155

Ampelsystem

Hey Leute,

ich bin ein totaler anfänger was programmieren angeht. Jetzt haben wir in der Schule die Aufgabe bekommen ein Ampelsystem zu entwerfen. Mit Autos und Fußgängern. Wir sollen das programm über einen Button starten, also die timer1.enabled:=true; und dann die timer so programmieren das die ...

Zur erweiterten Suche