AGB  ·  Datenschutz  ·  Impressum  







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

Variable übergeben?

Ein Thema von Maximus · begonnen am 21. Feb 2004 · letzter Beitrag vom 21. Feb 2004
Antwort Antwort
Maximus

Registriert seit: 26. Okt 2003
169 Beiträge
 
#1

Variable übergeben?

  Alt 21. Feb 2004, 10:22
Hallo,

Wie kann ich eine Variable übergeben von Form1 (Unit1) zu Form2(unit2)?

Ich les eine Kundenummer aus einer Datenbank aus (Paradox7 Tabelle - Feld "Nummer" als Zähler definiert).
Speichere es dan in die Variable nummer (nummer: string). Wenn ich die Variable nummer auf Form1(Unit1) anzeigen lasse funktioniert alles. Aber auf Form2 (Unit2) steht nichts in dem edit feld in dem ich sie anzeigen lassen will!

Ich hab schon einiges ausprobiert, z.b. per procedure die variable übergen, aber nichts hat funktioniert bisher! -

Weitere Angaben:
- In Unit1 wird Unit2 benutzt (also uses Unit2)
- In Unit2 wird Unit1 benutzt (also uses Unit1)

Hoffentlich wisst ihr weiter!
  Mit Zitat antworten Zitat
Benutzerbild von Stanlay Hanks
Stanlay Hanks

Registriert seit: 1. Mär 2003
2.078 Beiträge
 
Delphi 2005 Professional
 
#2

Re: Variable übergeben?

  Alt 21. Feb 2004, 10:33
Hi. Also wenn du Unit1 bei Unit 2 und Unit2 bei Unit1 in die Uses eingetragen hast, dürfte eigentlich der Compiler meckern, da du dann das ganze doppelt gemoppelt hast

Wenn du die Variable in Unit1 als globale Variable deklariert hast (unter z.B. der Deklaration von

Delphi-Quellcode:
Form1: TForm1;
Variable1 : Boolean;
Dann musst du nur noch z.B. in Unit2 Unit1 in die Uses aufnehmen und dann kannst du schreiben:

Unit1.Variable1; Man liest sich, Stanlay
  Mit Zitat antworten Zitat
Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#3

Re: Variable übergeben?

  Alt 21. Feb 2004, 10:43
der Compiler meckert nur wenn wenn das gegenseitige uses außerhalb der implementation ist. wenn das uses im implementationsteil ist funktionierts.
und dann sollte der zugriff über
Delphi-Quellcode:
 unit1.form1.variable := irgendwas;
 unit2.form2.variable := irgendwas;
möglich sein. worbei das "unit1." udn "unit2." weg gelassen werden kann
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat
Maximus

Registriert seit: 26. Okt 2003
169 Beiträge
 
#4

Re: Variable übergeben?

  Alt 21. Feb 2004, 10:56
Hallo,

Es hat funktioniert!

Aber den Fehler versteh ich nicht wirklich:

Ich hatte das  Edit1.Text := unit1.nummer testweise einmal im OnShow und im OnActivate Ereigniss von Form2. Anscheinend funktioniert das aber nicht

Jetzt hab ich ein Button hinzugefügt und das im OnCLick Ereignis stehen.

Wie kann man  Edit1.Text := unit1.nummer unterbringen, das es gleich angezeigt wird wenn man die Form sieht, ohne das der Benutzer irgendetwas macht?

MFG
Maximus
  Mit Zitat antworten Zitat
Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#5

Re: Variable übergeben?

  Alt 21. Feb 2004, 11:25
ins oncreate von form2 schreiben (vorrausgesetzt form2 wird nach form1 erzeugt) oder wie schon geschrieben ins onShow (keine ahnung warum das bei dir nicht funktioniert)
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  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 12:04 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