AGB  ·  Datenschutz  ·  Impressum  







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

Gleiche Form mehrmals erstellen

Ein Thema von phlux · begonnen am 28. Feb 2003 · letzter Beitrag vom 28. Feb 2003
Antwort Antwort
Benutzerbild von phlux
phlux

Registriert seit: 4. Nov 2002
Ort: Witten
1.335 Beiträge
 
Delphi 6 Personal
 
#1

Gleiche Form mehrmals erstellen

  Alt 28. Feb 2003, 15:18
Ahoi!
Also ich möchte für mein Programm so ne Art Lesefunktion von irgendwelchen Einträgen erstellen, diese Einträge sollen in einer neuen Form angezeigt werden. Diese Form soll jedoch auch ausserhalb der ersten From verschiebbar sein (also nix mit Child), so wie bei Outlook sobald man ne mail sich anguckt die in einem neuen fenster erscheint. Ich kriegs nicht gebacken, so einfach es auch klingt
Christian "phlux" Arndt
  Mit Zitat antworten Zitat
Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: Unterhaching
11.412 Beiträge
 
Delphi 12 Athens
 
#2
  Alt 28. Feb 2003, 16:09
Ist eigentlich ganz einfach. Mal angenommen Dein Form heisst frmAnsicht und die dazugehörige Klasse heisst TfrmAnsicht.
Delphi-Quellcode:
with TfrmAnsicht.Create(Self) do
try
  // z.b.
  MemoText.Text := 'Das ist der darzustellende Text';
  Show; // oder ShowModal;
finally
  Free;
end;
......
Daniel Lizbeth
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat
Benutzerbild von APP
APP

Registriert seit: 24. Feb 2003
Ort: Graz (A)
705 Beiträge
 
Delphi 7 Enterprise
 
#3
  Alt 28. Feb 2003, 16:22
Hallo,

Mal so schnell zusammengeschnippelt:
Du benötigst eine Form als Vorlage und ein Hauptformular, von dort aus erzeugst Du dann Instanzen deiner Vorlage.

Delphi-Quellcode:
INTERFACE

USES
   Windows,
   Messages,
   SysUtils,
   Classes,
   Graphics,
   Controls,
   Forms,
   Dialogs,
   FVorlage; // beinhaltet Form-Klasse "TaFVorlage" die Du mit Delphi erstellt hast

VAR
   aForm : TaFVorlage; // Formvorlage


 PROCEDURE TFMain.ShowErrorDLG; // Dialog zeigen
BEGIN
   aForm := TaFVorlage.Create(Application);
   WITH aForm DO
      BEGIN
         TRY
            aSaveDialog := TSaveDialog.Create(aForm);
            Caption := 'SuperDuper'
            Showmodal;
         FINALLY
            aSaveDialog.Free;
            Free;
         END;
      END;

Ups, Sakura war schneller, aber jetzt ists schon passiert!
Armin P. Pressler
  Mit Zitat antworten Zitat
Benutzerbild von phlux
phlux

Registriert seit: 4. Nov 2002
Ort: Witten
1.335 Beiträge
 
Delphi 6 Personal
 
#4
  Alt 28. Feb 2003, 17:06
Hi!
Beide Methoden sind ja fast gleich. Danke klappt!!!
Christian "phlux" Arndt
  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 00:12 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