Fehler: Falscher Variablentyp

[Sir Rufo]

Zitat von Stevie:

Wie man mit dem Debugger Zeile für Zeile durch den Source geht, weißt du aber, oder? Damit findet man dann die Stelle, die den Fehler verursacht.

Wer ein Architect sein Eigen nennt, der weiß das
Für alle anderen:

In der IDE den Cursor in die Zeile Excel := CreateOleObject('Excel.Application'); setzen und dann einfach mal F4 drücken.
Dann solange auf F8 bis der Fehler kommt.

Dann kennt man die Zeile, die den Fehler verursacht ...

[Stevie]

Zitat von Sir Rufo:

Zitat von Stevie:

Wie man mit dem Debugger Zeile für Zeile durch den Source geht, weißt du aber, oder? Damit findet man dann die Stelle, die den Fehler verursacht.

Wer ein Architect sein Eigen nennt, der weiß das
Für alle anderen:

In der IDE den Cursor in die Zeile Excel := CreateOleObject('Excel.Application'); setzen und dann einfach mal F4 drücken.
Dann solange auf F8 bis der Fehler kommt.

Dann kennt man die Zeile, die den Fehler verursacht ...

So viel Sarkasmus kenn ich sonst nur von mir selber

[ByTheTime]

Also irgendwie will das bei mir nicht, aber ich kann schonmal sagen das es ein Error vom Typ "EOleSysErro" ist.

[Sir Rufo]

Zitat von ByTheTime:

Also irgendwie will das bei mir nicht, aber ich kann schonmal sagen das es ein Error vom Typ "EOleSysErro" ist.

Was will nicht?

Wenn du in einer fremden Stadt etwas suchst, fragst du dann auch "Wie komme ich da denn hin?"?
Die Frage kannst du dir eigentlich sparen, denn die Antwort ist schon vorher klar: "Hä?"

[ByTheTime]

Also, (ihr quetscht mich ja ganz schön aus ), mit "Es will nicht" habe ich das Programm gemeint. Aber ich habe auch eine erfreuliche Nachricht. Ich habe erst gedacht, der Fehler tritt auf, wenn ich Excel öffne, da ich erst an ein Problem mit der Excel-Variable gedacht habe. Aber es war mal wieder ganz simpel, ich habe den Fehler durch "ausklammern" gefunden (mit {} immer den Code ausgeklammert, der es sicher nicht ist bis ich ganz nahe an der Fehlerquelle bin ).

Delphi-Quellcode:

Excel.Cells[4, 4].Value := EdName; //Was stimmt da wohl nicht?!

--> Excel.Cells[4, ].Value := EdName.Text;

Die Fehlermeldung hat mich etwas verwirrt, weil ich sie nicht mit dem Fehler in Verbindung bringen konnte... Hätte eher sowas erwartet wie 'Inkompitable Typen...'

Aber danke für den "Nachhilfeunterricht" in Sachen IDE

[Sir Rufo]

Weil das Ausklammern so umständlich ist, gibt es den Debugger.

Der Debugger funktioniert aber nur, wenn in den Projekt-Optionen "Debug" eingestellt ist.

Dann kann man Halte-Punkte setzen und komplett Schritt für Schritt durch das Programm gehen.

[schierl]

Hallo an alle Wissenden,

gibt es zu diesem Thema schon eine Lösung?
Ich habe das selbe Problem mit Delphi XE2, von D2005 bis zu XE hat es immer ohne Probleme geklappt!

In meinen Excel Exporten verwende ich folgende Zeile

...
ExcelWorksheet1.Cells.Item[i,1].value := q_crack_bei_km['ppa_Verfahren'];
...

Wobei ExcelWorksheet1.Cells.Item[i,1].value ein OleVariant,
q_crack_bei_km ein Dataset
und q_crack_bei_km['ppa_Verfahren'] ein TStringField ist.

Wenn ich die Zeile wie folgt abändere

...
ExcelWorksheet1.Cells.Item[i,1].value := string(q_crack_bei_km['ppa_Verfahren']);
...

oder

...
ExcelWorksheet1.Cells.Item[i,1].value := q_crack_bei_kmppa_Verfahren.Value;
...

funktioniert es wieder ohne Problem!
Bei den anderen Typen wie TIntegerField oder TFloatField tritt dieser Effekt nicht auf!
Genauso wenn ich es mit Delphi XE compiliere tritt der Fehler auch nicht auf.
Ich würde mir aber gerne ersparen alle TStringField ab jetzt zu casten!
Sollte ich noch etwas vergessen haben oder mehr Source Notwendig sein bitte bescheid geben!

Danke schon mal im Voraus

Johann