Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Finde meinen Fehler nicht!!! (https://www.delphipraxis.net/5395-finde-meinen-fehler-nicht.html)

buyden 4. Jun 2003 15:54


Finde meinen Fehler nicht!!!
 
Ich erhalte für untenstehende Prozedur ständig eine Fehlermeldung von wegen "table3 not in edit or insert mode". außerdem scheint Delphi die Zeile mit der Checkbox komplett zu ignorieren.
Kann mir mal jemand auf die sprünge helfen?
Delphi-Quellcode:
procedure TForm6.Panel6Click(Sender: TObject);
begin
datamodule2.Table2.edit;
datamodule2.Table3.edit;
if dbcheckbox1.checked=false then
begin
dbedit4.Text:=floattostr(strtofloat(dbedit4.Text)+strtofloat(dbedit2.Text));
dbcheckbox1.Checked:=true;
datamodule2.Table2.Post;
datamodule2.Table3.Post;
end;

end;

Andreas L. 4. Jun 2003 16:53

Re: Finde meinen Fehler nicht!!!
 
Zitat:

Zitat von buyden
Delphi-Quellcode:
procedure TForm6.Panel6Click(Sender: TObject);
begin
datamodule2.Table2.edit;
datamodule2.Table3.edit;
if dbcheckbox1.checked=false then <-- Hier muss ein : hin, also: dbcheckbox1.checked :=FALSE;
begin
dbedit4.Text:=floattostr(strtofloat(dbedit4.Text)+strtofloat(dbedit2.Text));
dbcheckbox1.Checked:=true;
datamodule2.Table2.Post;
datamodule2.Table3.Post;
end;

end;


Wolverine 4. Jun 2003 16:57

@onlinehome
Das hab ich mir auch schon gedacht, aber bei mir gibt delphi dann immer ne fehlermeldung aus, das dort zu wenige parameter sind oder so.

Sollte das bei ihm auch so sein, hätte er es schon geändert, denke ich mal!!!
Aber wer weiss .... scheint ja von Delphi zu Delphi unterschiedlich zu sein :wink: ^^

Andreas L. 4. Jun 2003 17:00

In D6 Personal gibts diese Kompo gar net, deshalb habe ich mir das so gedacht! Hätte ja sein können!

Wolverine 4. Jun 2003 17:02

Welche Kompo gibt es in D6 Personal nicht???

MrSpock 4. Jun 2003 17:03

Hallo horus,

ist Table3 vielleicht leer? In diesem Fall müsstest du z.B. mit Table3.Append einen Satz hinzufügen (und damit die Tabelle gleichzeitig in den Edit Mode versetzen.

@onlinehome: in die Zeile
Delphi-Quellcode:
if dbcheckbox1.checked=false then
muss KEIN Doppelpunkt, da es sich um eine Gleichheitsabfrage und nicht um eine Zuweisung handelt. Eine Zuweisung ist hier nicht erlaubt. Es wäre aber etwas besser sie wie folgt zu schreiben:

Delphi-Quellcode:
if NOT dbcheckbox1.checked then

Wolverine 4. Jun 2003 17:07

@MrSpock

Ähm ...
... ich hab die Frage nicht gestellt, nur so zur Info :wink: 8)

Ich hatte dann nachhher nur nach der Kompo gefragt, die onlinehome meinte!

buyden 4. Jun 2003 17:14

Hi Mr.Spock,
also die Tabelle ist nicht leer. Die Prozedur dient dazu, einem in table2 gespeicherten Wert mit einem in einen neuen Datensatz in table3 eingegebenen Wert zu addieren und den dann wieder in table2 zu speichern.
Der veränderte Code mit dem not bringt die gleiche Meldung.

buyden 5. Jun 2003 17:21

Na, hat noch jemand ne Idee?? :hello: Ich glaub ich hab jetzt schon alle möglichen Varianten ausprobiert aber ohne Erfolg. Das ganze funzt sofort wenn ich die table3.post-Zeile rausnehme.
Ich fress gleich meine Maus!! :twisted:


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:52 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz