Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  AW: Delphi verändern

   
    by bcvs, 12. Mai 2015
  In deinen Repeat until-Schleifen tut sich ja gar nichts.
  
  statt
  repeat
  a:=a+1;
  until a>123;
  
  kannst du auch gleich schreiben a:=124; mehr macht diese Schleife nicht. Du muss innterhalb jeder dieser Repeat-Schleifen nochmal
  Paintbox1.Canvas.Brush.Color:=rgb(a, b, c);
  Paintbox1.Canvas.Pie(60, 160, 100, 200, 60, 180, 100, 180);
• Forum: Sonstige Fragen zu Delphi

  AW: Delphi verändern

   
    by bcvs, 12. Mai 2015
  Dann mach das doch mit einem Timer:
  
  geeignetes Timerintervall festlegen (vielleicht 10, musst du halt ausprobieren).
  
  Im Timerevent setzt du die Farbe auf den nächsten Farbwert und malst du den Halbkreis komplett neu, solange bis die Zielfarbe erreicht ist. Du brauchst nur noch den Algorithmus für die Berechnung des nächsten Farbwertes. Vielleicht wirst du da bei den hier schon geposteten...
• Forum: Sonstige Fragen zu Delphi

  AW: Delphi verändern

   
    by bcvs, 12. Mai 2015
  Ja genau, das wäre einfach. Der Haushaltsprofi müsste halt nochmal beschreiben, wass er genau will.
• Forum: Sonstige Fragen zu Delphi

  AW: Delphi verändern

   
    by bcvs, 11. Mai 2015
  Wenn ich das richtig verstanden habe, geht es hier nicht um einen Farbverlauf (Gradient) sondern um eine animierte Farbänderung. Das könnte man mit einem Timer machen, der das Rechteck mit leicht geänderter Farbe immer wieder neu malt, bis die Zielfarbe erreicht ist.
  
  Für die Farbänderung könnten die Algorithmen aus der Gradient-Funktion hilfreich sein.