AGB  ·  Datenschutz  ·  Impressum  







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

Memofelder auf einem Form erstellen

Ein Thema von LoW_FloW · begonnen am 29. Dez 2005 · letzter Beitrag vom 29. Dez 2005
Antwort Antwort
Benutzerbild von LoW_FloW
LoW_FloW

Registriert seit: 29. Nov 2003
117 Beiträge
 
Delphi 7 Professional
 
#1

Memofelder auf einem Form erstellen

  Alt 29. Dez 2005, 18:30
Hallo! Ich würde gerne während der Laufzeit mehrere Formular mit 2 Memofeldern erstellen. Dazu habe ich den folgenden Code geschrieben:

Delphi-Quellcode:
procedure TfrmMain.FormErstellen(Titel: string);
var
  Form1: TForm;
  memoVerlauf, memoText: TMemo;
begin
  Form1 := TForm.Create(Self);
  try
    with Form1 do
    begin
      ////////////////////////
      // ALLE EIGENSCHAFTEN //
      ////////////////////////
      //FARBE//
      Form1.Color := frmRustCQ.Color;
      Form1.Caption := Titel;
      // 2 Memofelder//
      memoVerlauf := TMemo.Create(self);
      memoText := TMemo.Create(self);
      with memoVerlauf do
      begin
        Left := 8;
        Top := 8;
        Height := 117;
        Width := 345;
      end;
      with memoText do
      begin
        Left := 8;
        Top := 216;
        Height := 97;
        Width := 345;
      end;
      //MITTE//
      Form1.Left := (Screen.Width div 2) - (Form1.Width div 2);
      Form1.Top := (Screen.Height div 2) - (Form1.Height div 2);
      ////////////////////////
      show;
    end;
  finally
  end;
end;
Das Formular wird angezeigt, nur die 2 Memofelder nicht. Vielleicht liegt es daran, dass ich den memofeldern nicht gesagt hab, dass sie zum formular gehören, doch wie geht das!?

Thx schonma
  Mit Zitat antworten Zitat
Benutzerbild von dahead
dahead

Registriert seit: 16. Mai 2005
620 Beiträge
 
#2

Re: Memofelder auf einem Form erstellen

  Alt 29. Dez 2005, 18:43
so:
Delphi-Quellcode:
memoVerlauf := TMemo.Create(Form1); // hier den sog. Owner angeben - muss nicht zwingend Form1 sein
memoVerlauf.Parent := Form1; // hier wird Parent angeben
memoText := TMemo.Create(Form1); // hier den sog. Owner angeben - muss nicht zwingend Form1 sein
memoText.parent := Form1; // hier wird Parent angeben
  Mit Zitat antworten Zitat
Benutzerbild von LoW_FloW
LoW_FloW

Registriert seit: 29. Nov 2003
117 Beiträge
 
Delphi 7 Professional
 
#3

Re: Memofelder auf einem Form erstellen

  Alt 29. Dez 2005, 19:29
danke funktioniert 1.Klasse
  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 21:21 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