Einzelnen Beitrag anzeigen

Blup

Registriert seit: 7. Aug 2008
Ort: Brandenburg
1.464 Beiträge
 
Delphi 12 Athens
 
#6

AW: if routine für getpixel (brett vorm kopf)

  Alt 10. Feb 2011, 08:17
x := x + 1; Aber dann sollte es eine zusätzliche Abbruchbedingung geben.

Vieleicht besser so:
Delphi-Quellcode:
for x := {xMin} to {xMax} do
begin
  if {TestFarbe1} then
  begin
    panel1.color := clBLUE;
    Break;
  end;
  if {TestFarbe2} then
  begin
    panel1.color := clGREEN;
    Break;
  end;
end;
  Mit Zitat antworten Zitat