Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  AW: Allgemeine Abfrage von Klassen

    Delphi
    by s.h.a.r.k, 10. Dez 2010
  Kein Problem, dafür gibts ja die DP :dp:
  
  Hab hier auch schon so viel erklärt bekommen und bin Gott froh um jede Antwort. Daher gebe ich dann auch gerne was an die Community zurück.
  
  Na dann hau mal in die Tasten Äh, ich meine, ab zum Lernen :mrgreen:
• Forum: Programmieren allgemein

  AW: Allgemeine Abfrage von Klassen

    Delphi
    by s.h.a.r.k, 10. Dez 2010
  Nun ja, es kommt drauf an, wie du vor gehst. Ich gehe mal davon aus, dass du alle Panels direkt in Delphi auf die Form setzt, oder? Dann kannst du es folgendermaßen machen:
  type
  TForm1 = class(TForm)
  { das übeliche Gedöns halt... }
  private
  FPanelList : TObjectList;
  function HitTest(ObjA, ObjB: TControl): Boolean;
  end;
• Forum: Programmieren allgemein

  AW: Allgemeine Abfrage von Klassen

    Delphi
    by s.h.a.r.k, 10. Dez 2010
  What? Nein. Muss hier doch etwas weiter ausholen ;) Aber eines noch vorweg: Eine Frage, ein Thread. Denn diese Frage hat an sich nichts mehr mit dem vorher gefragten Thema zu tun.
  
  type
  TMensch = class(TObject)
  { Eigenschaften und Methoden (public/private) }
  end;
  
  
  var
  Person : TMensch;
• Forum: Programmieren allgemein

  AW: Allgemeine Abfrage von Klassen

    Delphi
    by s.h.a.r.k, 10. Dez 2010
  Dir fehlt die Unit, in der TObjectList deklariert ist. Bei uses oben muss noch Contnrs dazu.
• Forum: Programmieren allgemein

  AW: Allgemeine Abfrage von Klassen

    Delphi
    by s.h.a.r.k, 10. Dez 2010
  Das ist nur ein Variablenname ;) Der kann auch xyz heißen. Der Typ ist das wichtige dabei: TObjectList. Das ist eine Liste mit all den Objekten, die du eben da rein wirfst. Somit kannst du drüber iterieren.
• Forum: Programmieren allgemein

  AW: Allgemeine Abfrage von Klassen

    Delphi
    by s.h.a.r.k, 10. Dez 2010
  Hau die Panels eben in eine Liste und iterier über diese Liste?
  
  var
  PanelList : TObjectList;
  i : Integer;
  pn : TPanel;
  begin
  PanelList.Add(TPanel.Create(nil));
  PanelList.Add(TPanel.Create(nil));
  PanelList.Add(TPanel.Create(nil));