Registriert seit: 7. Aug 2008
Ort: Brandenburg
1.464 Beiträge
Delphi 12 Athens
|
AW: if routine für getpixel (brett vorm kopf)
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;
|