Werte aus anderen Klassen abfragen

[Udontknow]

Hallo!

Ähem, was soll denn nun passieren? Bzw. was passiert denn stattdessen?

Das ganze ist ein bisschen "per Glaskugel", aber müsste es nicht "Self" anstelle von "Form3" heissen? Evtl. generierst du ja neue Instanzen von TSicherheit...

Zitat:

TModell.testeschluessel(Edit1.Text); //soll die funktion ausführen

Das passiert wahrscheinlich auch, du hast nur keine Ausgabe definiert.

Zitat:

if TModell.testeschluessel(Edit1.Text) then
ShowMessage('Richtig!')
else
ShowMessage('Falsch!') ; //soll die funktion ausführen

Du benutzt einfach nur die Klasse, eigentlich müsste TModell auch noch instantiiert werden, also

Delphi-Quellcode:

var Modell:TModell
begin
  Modell:=TModell.Create(NIL);
  try
    if TModell.testeschluessel(Edit1.Text) then 
      ShowMessage('Richtig!') 
    else 
       ShowMessage('Falsch!') 
  finally
    Modell.Free;
  end;

end;

Cu,
Udontknow