Forum: Datenbanken
Delphi
by MrSpock,
24. Okt 2004
Hallo needatip,
sehr gut! Du benötigst zu einem Bezeichner die zugehörige ID, die kannst du zwar aus der Tabelle auslesen, oder aber du merkst sie dir bereits beim Einlesen. Und da kam meine Idee her, sich die ID als "Objekt" zu merken:
procedure TForm1.FormCreate(Sender: TObject);
begin
TabBranchen.Open;
while Not TabBranchen.Eof do
Forum: Datenbanken
Delphi
by MrSpock,
24. Okt 2004
Hallo needatip,
wo ist denn das Problem? Wie weit bist du gekommen als du versucht hast die Methode zu schreiben?
Ich hab zwar eine Lösung geschrieben, aber die möchte ich dir nicht einfach so geben. Du solltest zunächste einmal deine OnCreate Methode so anpassen, dass du dir neben dem Bezeichner der Branche auch die ID merkst. Das könntest du z.B. mit AddObject machen, wobei du als Objekt...
Forum: Datenbanken
Delphi
by MrSpock,
23. Okt 2004
Hallo needatip,
du läufst durch die Tabellee und suchst den entsprechenden Bezeichner in der Liste mit IndexOf:
procedure TForm1.DataSource1DataChange(Sender: TObject; Field: TField);
var
i, index: Integer;
begin
for i := 1 to CheckListBox1.Count do
CheckListBox1.State := cbUnchecked;
Forum: Datenbanken
Delphi
by MrSpock,
21. Okt 2004
Hallo needatip,
zur Initialisierung der Checklistbox läufst du z.B. beim OnCreate des Formulars durch die Branchentabelle und fügst alle Einträge zur Items Eigenschaft hinzu. Das DataSource Object, dass der Adressen Tabelle zugeordnet ist, zeigt an, wenn ein anderer Datensatz aktiviert wird und zwar über sein OnDataChange Event. In diesem Fall läufst du durch die Detailtabelle TabAdrBra und...
Forum: Datenbanken
Delphi
by MrSpock,
21. Okt 2004
Hallo needatip,
zunächst musst du für Tabelle AdressenBranchen noch einen SekundärIndex definieren. Nenne ihn "nachAdressen" und wähle das Feld Adr_ID aus.
Jetzt packst du 3 TTable Objekte auf dein Formular und 2 Sourcen. Verbinde die 3 Tabellen Objekte mit je einer Tabelle. Setze jetzt MasterSource von TabAdrBra auf SrcAdressen (DataSource auf die Adressentabelle). Wähle MasterField aus...
Forum: Datenbanken
Delphi
by MrSpock,
21. Okt 2004
Hallo needatip,
das sind zwei Probleme. Zunächst einmal willst du jeder beliebigen Adresse m verschiede Branchen aus der Branchentabelle zuordnen. Das macht man in der Regel über eine dritte Tabelle. Nenne die dritte Tabelle einfach AdressenBranchen. Diese hat nur 2 Felder, nämlich die ID der Adresse und die ID der Branche. Beide Felder zusammen bilden den Schlüssel. Alternativ dazu kannst du...