Incompatible Types: 'Boolean' and 'Integer'

[flomei]

Tach!
Ich würd gerne den Text eines Labels in ein Memo hinzufügen.
Das ganze will ich möglichst einfach mit

Code:

infocheck.Lines.add(Lblyes.Caption);

machen. Egal was ich änder (leuchtet mir ein dass man nicht viel am Typ der Komponente :? (oder war das jetzt falsch) ändern kann) ich krieg jedesmal dieses schöne?!? Fehlermeldung:

Zitat:

[Error] Unit2.pas(93): Incompatible types: 'Boolean' and 'Integer'

Ich hoffe ich muss euch das nicht übersetzen :wink:

Was kann ich ändern oder besser machen, damit es funktioniert???

Thx im Voraus!

MfG Florian

[Daniel B]

Hallo flomei,

das Problem kommt woanders her. Wenn Dir dieser Fehler angezeigt wird, wo steht dann der Cursor?
Denn
Memo1.Lines.Add(Label1.Caption);
geht sehr wohl!

Grüsse, Daniel :hi:

[flomei]

Meine Fresse bin ich dämlich! :wall: :wall: :wall: :wall: :wall: :wall: :wall: :wall: :wall: :wall:

Code:

if
yes.Checked
then
infocheck.Lines.add(Lblyes.Caption);

Das war jetzt aber echt dämlich!
:wall: :wall: :wall: :wall:

Vielen Dank für die schnelle Hilfe!

MfG Florian

[flomei]

Jetzt weiss ich wieder was ich noch Fragen wollte!
Wie kann ich innerhalb einer Prozedur mehrere If Bedingungen einbauen. Ich demonstrier das besser mal kurz:

Delphi-Quellcode:

//tu dies
//tu das
//tu noch mehr
//immer noch was machen
//immer weiter

if
blabla.Checked
then
//tu noch was anderes
else
if  {<-- ich glaub hier ist der erste Fehler}
blablabla.Checked
then
//tu noch was ganz anderes
{jetzt irgendwie Ende der Bedingungen}

{neue fangen an}
if
blabla.Checked
then
//tu noch was anderes
else
if
blablabla.Checked
then
//tu noch was ganz anderes

{ende zum zweiten}

Form3.ShowModal;
end;

Ich hoffe ihr versteht jetzt so ungefähr was ich meine.

Thx!

MfG Florian

[edit=Daniel B]Delphi-Tags gesetzt. Florian, Bitte [ delphi]und[/delphi], anstatt [ code]und[/code] benutzen. Danke! MfG Daniel B.[/edit]

[Haegar]

haste es denn schonmal so probiert???
aber eigentlich könnteste dir dann das "else" sparen.

gruss haegar

[Hansa]

Hi Flomei,

wer haut sich so den Kopf gegen die Wand, so dumm war die Frage doch nicht, krieg ja fast selber Kopfweh. :wall: Was Du brauchst (mit IF THEN ELSE usw.) ist CASE Bitte in der Hilfe nachlesen.

P.S.: habe gerade noch gesehen, daß in dem Posting anscheinend Code-Tags hinzugefügt sind, der sieht aber trotzdem kriminell aus. :mrgreen: Wie willst Du da die Übersicht behalten und was ist mit den ";" :?: Der erste Fehler könnte wegen eines fehlenden ; komme, oder wegen eines überflüssigen vor ELSE.

[flomei]

Verzeihung Daniel!

Naja, ich steig noch durch. Das sollte auch nicht mehr werden.

tut mir leid, dass ich das nicht sofort nachgucken kann aber ich hab Mandelentzündung und deshalb geh ich gleich wieder ins Bett.
Ich hab das schon mal ohne else ausprobiert aber da bekam ich auch ne Fehlermeldung, glaub ich. :?

Sorry, aber es geht mir heute echt nicht so gut. Ich setz mich bald wieder dran.

Trotzdem Thx!

MfG Florian

P.S.: Mittwoch fahr ich zur CeBit :bouncing4: :bounce1: :bounce2: :dancer: :dancer2:

[RomanK]

Hoi,
erst mal gute Besserung und viel Spaß auf der CeBit :evil:
Nun zum Problem:

Delphi-Quellcode:

if flomei.krank then
// naja dann bist du halt krank ;)) und kannst ned zur CeBit ;)) der eine Befehl hier darf kein ; am ende haben!!!!

else if flomei.vater.krank then // dieser bedingung wird nur überprüft wenn du gesund bist.
// leider ist dein vater krank... du kannst ned zur CeBit ;)) der eine Befehl hier darf kein ; am ende haben!!!!
else // das wird nur ausgeführt wenn alle vorherigen abfragen negativ verlaufen sind, also du und dein Vater gesund sind.

// jetzt kannsch zur CeBit  :D dieser befehl aber bitte mit ;

oder wenn du mehrere Aktionen pro Bedingung machen willst dann immer mit begin und end.

Delphi-Quellcode:

if flomei.krank then
begin
// naja dann bist du halt krank ;)) und kannst ned zur CeBit ;)) 
// Hier kannst du mehr als nur ein Befehl ausführen.
end // wichtig: ohne ;
else if flomei.vater.krank then // dieser bedingung wird nur überprüft wenn du gesund bist.

begin
// leider ist dein vater krank... du kannst ned zur CeBit ;)) 
// Hier kannst du mehr als nur ein Befehl ausführen.
end
else // das wird nur ausgeführt wenn alle vorherigen abfragen negativ verlaufen sind, also du und dein Vater gesund sind.
begin
// jetzt kannsch zur CeBit  :D
end; // wichtig: mit ;

flomei.krank und flomei.vater.krank mussen boolsche Werte sein
Naja, ich hoffe das es dir Hilft.
PS: wenn du in der Hilfe unter if-Anweisungen suchst findest du eine gute Beschreibung über die ganze Sache.

[Haegar]

:mrgreen: ich göaub das war mehr als verständlich :mrgreen:
wirklich kompetente leute hier :D

gruss haegar

[Luckie]

@flo...-Dingsbums: Neue Frage, neuer Thread bitte. Dann findet man Themen mit der Suche leichter wieder.