Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  AW: StringGrid DragMode Color

    Delphi
    by Sir Rufo, 28. Jan 2015
  Da wir mit dem Recall ja nicht das Grid ansprechen, sondern vom Grid, den Canvas und davon den Brush, wird genau dieser (Brush) wieder auf den Zustand gebracht, wie er beim Recall Aufruf war.
  
  @Jumpy
  
  Die RecallFactory habe ich selber gebaut um dieses Backup/Restore mit genau einer Zeile hinzubekommen. Und wie du siehst benutze ich dafür die Generics, die es mWn bei Delphi 6 noch nicht gibt...
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  AW: StringGrid DragMode Color

    Delphi
    by Sir Rufo, 28. Jan 2015
  Verstehst du wie so eine Edit-Komponente oder StringGrid-Komponente intern funktioniert?
  Wenn Nein, warum verwendest du diese dann?
  
  Du verwendest diese, weil du das Gefühl hast, die macht das was du möchtest, egal wie sie dies macht. Du verlässt dich darauf, dass die zugesicherten Eigenschaften auch gebracht werden.
  
  Genau so arbeitet man mit dem TBrushRecall oder mit der der (in der...
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  AW: StringGrid DragMode Color

    Delphi
    by Sir Rufo, 28. Jan 2015
  Ähm, wenn das Schreiben von einer Zeile Code schon zu kompliziert ist, wie programmierst du dann? :gruebel:
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  AW: StringGrid DragMode Color

    Delphi
    by Sir Rufo, 28. Jan 2015
  Häh? Das TBrushRecall hat mit Drag und sonst was nix, aber auch gar nix zu tun.
  
  Du schreibst irgendwo im Paint-Event
  
  procedure FooOnPaint( ... );
  begin
  // oh, wer weiß ob die Farbe überhaupt noch richtig ist, vielleicht habe ich ja geschludert
  stringgrid.Canvas.Brush.Color := clWhite;
  
  if StringGrid.Cells = 'O' then
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  AW: StringGrid DragMode Color

    Delphi
    by Sir Rufo, 28. Jan 2015
  Genau für dieses Szenario gibt es extra die Klassen TBrushRecall und TFontRecall.
  
  Eine sinnvolle Ergänzung wäre es, wenn man sich noch ein Interface dafür bauen würde, dann käme man für die meisten mit nur einer Zeile Code aus. Ansonsten sieht das so aus:
  
  procedure WorkWithCanvas( ACanvas : TCanvas );
  var
  LBrushRecall : TBrushRecall;
  begin
  LBrushRecall := TBrushRecall.Create(...