AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Unit Aufbau

Ein Thema von Ruffy87 · begonnen am 21. Mär 2006 · letzter Beitrag vom 21. Mär 2006
Antwort Antwort
Ruffy87

Registriert seit: 12. Jan 2006
45 Beiträge
 
Delphi 6 Professional
 
#1

Re: Unit Aufbau

  Alt 21. Mär 2006, 16:13
Hab noch eine letzte Frage(das ist eigentlich meine Hauptfrage bei dem Thema):

Eine Methode im Public Teil muss man schreiben, wenn man diese von anderen Units aufrufen will,
das ist jetzt klar.

Wenn ich aber jetzt eine Prozedur schreiben will, die nur in der einen Unit/Form verwendet werden soll,
könnte ich die Prozedur ja entweder in den Private Teil schreiben oder direkt in die Unit.
Wann mache ich den was?

Ein Bsp. von meinem Programmcode:
1. Möglichkeit

Delphi-Quellcode:
procedure BK_Suchen(BK_Name:String; var BK: TTreeNode);
var TV_Count, BK_Index:integer;
    BK_Gefunden: Boolean;
begin
  with FormHaupt do
  begin
//Variablen initialisieren
    BK_Gefunden := false;
    TV_Count := TreeViewHaupt.Items.Count - 1;
    BK_Index := -1;

//Eintrag suchen
    repeat
      inc(BK_Index);
      BK := TreeViewHaupt.Items[BK_Index];
      if BK.Text = BK_Name then
        BK_Gefunden := true;
    until(BK_Gefunden) or (BK_Index = TV_Count);
  end;
end;
2. Möglichkeit

Delphi-Quellcode:
interface
...
  private
    procedure BK_Suchen(BK_Name:String; var BK: TTreeNode);
...
implementation
...
procedure TFormHaupt.BK_Suchen(BK_Name:String; var BK: TTreeNode);
var TV_Count, BK_Index:integer;
    BK_Gefunden: Boolean;
begin
//Variablen initialisieren
  BK_Gefunden := false;
  TV_Count := TreeViewHaupt.Items.Count - 1;
  BK_Index := -1;

//Eintrag suchen
  repeat
    inc(BK_Index);
    BK := TreeViewHaupt.Items[BK_Index];
    if BK.Text = BK_Name then
      BK_Gefunden := true;
  until(BK_Gefunden) or (BK_Index = TV_Count);
end;
...
Beides funktioniert, aber wann wende ich was an?
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 07:54 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz