Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls
    Delphi
    by APP, 15. Mai 2003
  Hallo,
  wieder mal ganz kurz:
  Ich Denke Du müßtest in Deiner Komponente eigene TString Klasse ableiten und benutzen, dort die Methode TSring.Add "Overriden" (ist virtuell) und dort die TControlTabs.Paint Methode ausführen...
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls
    Delphi
    by APP, 15. Mai 2003
  Hallo, ich habe heut leider nicht viel Zeit aber folgendes ist mit noch aufgefallen:
  
  procedure TForm1.Button1Click(Sender: TObject);
  begin
  ControlTabs1.Items.Add('Test');
  end;
  
  ruft in der Unit Classes
  
  function TStrings.Add(const S: string): Integer;
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls
    Delphi
    by APP, 14. Mai 2003
  Sorry, mir fällt im Moment auch nix mehr ein (war ein langer Tag),
  aber es dürft wohl nur eine Kleinigkeit sein, da z.B.
  procedure TForm1.Button1Click(Sender: TObject);
  begin
  ControlTabs1.Items.Add('Test');
  ControlTabs1.Repaint;
  end;
  funktioniert.
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls
    Delphi
    by APP, 14. Mai 2003
  Hallo,
  
  PROCEDURE TControlTabs.SetItems(CONST Value: TStrings);
  BEGIN
  FItems.Assign(Value);
  SetLength(FButtons, FItems.Count);
  INHERITED Paint; // <-- JETZT FUNKTS LEIDER NICHT
  Invalidate;
  END;
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls
    Delphi
    by APP, 14. Mai 2003
  Hallo,
  
  vielleicht tut es ein Repaint bei SetItems,
  leider habe ich jetzt keinen Code mehr vor augen, da Du gerade Dein posting umgestellt hast :bounce1: