AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Object-Pascal / Delphi-Language Delphi Suche Beispiel, um Zeiger besser zu verstehen
Thema durchsuchen
Ansicht
Themen-Optionen

Suche Beispiel, um Zeiger besser zu verstehen

Ein Thema von Christian18 · begonnen am 17. Jan 2005 · letzter Beitrag vom 18. Jan 2005
 
perle

Registriert seit: 8. Apr 2004
183 Beiträge
 
Delphi 7 Enterprise
 
#14

Re: Suche Beispiel, um Zeiger besser zu verstehen

  Alt 18. Jan 2005, 10:41
ich habe eine ganz kleine Frage zu Motzis Tutorial, dafür will ich nicht extra nen Thread aufmachen, da das vielleicht auch ganz interessant für den Themenstartet sein könnte.....

Zum erzeugen der Forms benutzt Motzi folgenden Code :

Delphi-Quellcode:
procedure TMainForm.CreateButtonClick(Sender: TObject);
begin
  GetMem(FormP, SizeOf(TMultipleForm)); // --> reserviert an der Adresse von FormP den Speicher für die Form
  FormP^ := TMultipleForm.Create(Self); // --> erzeugt die Form
  FormP^.Caption := FormP^.Caption + IntToStr(Liste.Items.Count + 1);
  FormP^.Label1.Caption := LabelText.Text;
  FormP^.OnHide := ListeClick; // --> beim verstecken des Fensters muss ja die Button-Aufschrift aktualisiert werden...
  FormListe.Add(FormP); // --> fügt den Pointer zur Liste hinzu
  Liste.Items.Add('Form' + IntToStr(Liste.Items.Count + 1));
end;
mir stellte sich dann die Frage ob man das ganze Konzept nicht auch folgendermaßen machen könnte :

Delphi-Quellcode:
procedure TMainForm.CreateButtonClick(Sender: TObject);
begin
  FormListe.Add(TMultipleForm.Create(Application));
  TMultipleForm(FormListe[FormListe.Count - 1]).Caption := 'Form' + IntToStr(Liste.Items.Count + 1);
  TMultipleForm(FormListe[FormListe.Count - 1]).Label1.Caption := LabelText.Text;
[...]
end;

usw.... beim Testen hat das so eigetnlich funktioniert und logisch wärs doch eigentlich auch , da ein Typ doch eigentlich auch nur ein Pointer ist !?

Wo lägen dort Vor- bzw. Nachteile
und wofür muss man explizit das GetMem machen? Was passiert wenn man es weg lässt?

Fragen über Fragen, dankbar für Antworten
  Mit Zitat antworten Zitat
 


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 19:55 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz