TEdit nicht richtig ausgelesen, String bleibt leer

[WhatATime]

Hallo zusammen,

bin gerade ratlos und meine Suche bringt mich auch nicht weiter.
Ich möchte ganz einfach aus verschiedenen TEdit Feldern die Werte auslesen.

Code:

procedure TForm1.GetEditValues;
var
  aDoubleValue1, aDoubleValue2: Double;
  aIntValue: Integer;
begin

  // Stuff passiert hier...

  aDoubleValue1 := StrToFloat(Edit_Double_y.Text);  // kein Problem
  aDoubleValue2 := StrToFloat(Edit_Double_x.Text);  // kein Problem
  aIntValue := StrToInt(Edit_Int.Text);             // Problem

  //  Stuff passiert hier...

end;

Der String, der aus Edit_Int gelesen werden soll, ist aber jedes mal leer,
weshalb bei der Umwandlung in einen Integer natürlich ein Fehler auftritt.

Darum frage ich mich, warum der String denn leer sein sollte? Alle TEdits sind gefüllt.
Ich komm einfach nicht darauf.

Hat jemand eine Idee? Danke für eure Hilfe!