Hi...
kleines Problem mit folgendem Quelltext
Delphi-Quellcode:
procedure TFakt.PageControl1Change(Sender: TObject);
var
api1 :
string;
begin
if PageControl1.ActivePageIndex = 0
then
begin
// Hier sind SQL-Anfrage und und und...
// Es wird nicht aus der Prozedur gesprungen!
if api1 = '
1'
then
begin
//mach was
end;
api1 := '
0';
end;
if PageControl1.ActivePageIndex = 1
then
begin
// Hier sind SQL-Anfrage und und und...
// Es wird nicht aus der Prozedur gesprungen!
api1 := '
1';
end;
end;
Wenn z.B. ActivePageIndex = 0 dann sollte api1 = 0 sein und beim nächsten durchlauf, wenn ActivePageIndex = 1 ist dann api1 = 1 noch ein durchlauf, dann sollte die if Anweisung bei ActivePageIndex = 0 ausgeführt werden weil api1 noch = 1 ist. Nur bei jedem Aufruf der Prozedur ist der Wert in api1 leer. Warum
Wenn ich api1 als integer declariere dann überspringt mir Delphi beim debuggen die Zeile komplett und sie wird nicht ausgeführt sondern zur nächsten Zeile gesprungen
Ich verstehe das nicht!
Vielleicht hat von euch einer eine Erklärung. Danke schon mal im vorraus
Greets
Luciano