Text aus TEdit auslesen

[DeddyH]

Zitat von himitsu:

@DeddyH: Da steht nicht, daß die wirklich auf der Form liegen ... man könnte auch die Felder per Hand in die Klasse geschrieben haben.

Achja? Wenn ich das an der Stelle versuche, bekomme ich beim Kompilieren:

Zitat:

[Window Title]
Fehler

[Content]
Feld Form8.TestEdit besitzt keine entsprechende Komponente. Soll die Deklaration entfernt werden?

[Ja] [Nein] [Abbrechen] [Hilfe]

@TE: Nochmal: wann wird der Code aufgerufen? Im FormCreate von Form1 ist das definitiv zu früh.

[Marcel2906]

Also diese funktion wird beim Klick auf tButton in Form1 aufgerufen....ich häng mal meine Datei an...

[Luckie]

Und wo wird Formular2 angezeigt?

Delphi-Quellcode:

Procedure TForm1.Button2Click(Sender: TObject);
Var
   i, x, y, z: integer;

Begin
   x := 0;
   y := 0;
   z := 1;
   Sudoku[0, 0] := Form2.outFeld00;

   {   While x < 9 Do Begin
         Sudoku[x, y] := StrToInt(SudokuZahlen.Text[z]);
         z := z + 1;
         y := y + 1;

         If y = 8 Then Begin
            x := x + 1;
            y := 0;
         End;
      End;
   }
End;

[DeddyH]

Zitat:

Delphi-Quellcode:

Var
   Form1: TForm1;
   Form2: TForm2; //das ist falsch!

Du definierst Dir ja in Unit1 eine eigene Variable Form2. Binde stattdessen Unit2 ein.

[Luckie]

Das kommt hinzu. Aber er übergibt an sein Array einen Wert, der noch gar nicht existiert, da der Benutzer noch gar nichts eingegeben hat, weil er gar nichts eingeben konnte, da das Formular ja gar nicht angezeigt wird. Ich glaube, da hapert es noch etwas am Verständnis, wie die anwendung funktionieren soll.

[DeddyH]

Das Formular wird sehr wohl angezeigt. Dass man besser TryStrToInt oder StrToIntDef benutzen sollte ist allerdings korrekt.

[Luckie]

Mist. Ich dachte das wäre das Formular im Editor.

[Marcel2906]

okay, jetzt funktioniert es.
Aber Try muss ich doch gar nicht, oder...man kann ja nur zahlen eingeben

[DeddyH]

Gib mal nix ein und klick dann den Button.