[Großer TD-Bug] Buttons verschwinden bei Druck auf Strg+Alt

[Namenloser]

Zitat von Jacques Murell:

Heyho, danke aber das sieht mir stark nach der Unit aus dem EDN aus, die habe ich schon am Laufen und sie verhindert auch das die Buttons verschwinden aber wie gesagt nicht das das Richedit verschwindet...

Äh sorry, hab ich nicht gesehn. Bei EDN muss man sich ja erst einloggen, um was runterladen zu können.

Hast du mal versucht, den Code anzupassen?

Delphi-Quellcode:

    // repaint only controls of affected type
    if (TheCtrl is TButtonControl) or (TheCtrl is TStaticText) then
    begin
      TWinControl(TheCtrl).Repaint;
      exit; // TButtonControls, TStaticText do not contain controls so skip rest
    end;

    // NEU: -----------------------------------------------------------------
    if (TheCtrl is TCustomRichEdit) then
    begin
      TCustomRichEdit(TheCtrl).Repaint;
      exit; // TCustomRichEdit does not contain controls so skip rest
    end;
    // /NEU: ----------------------------------------------------------------