Chybová hláška, Kalkulačka – Delphi – Fórum – Programujte.com

Dobrý den,

chci si vytvořit jednoduchou kalkulačku, už jsem skoro u cíle, ale zarazila mě jedna stále-se-opakující hláška:

unit1.pas(...) Error: Incompatible type for arg no. 1: Got ...

Vždy tam je samozřejmě něco jiného, ale pořád je to to samé. Nevíte co to znamená?

Totiž mám tři proměnné: cislo1, cislo2 a znamenko. Při stisku nějakého tlačítka s číslem, se proměnná Edit změní na číslo, které je na tlačítku. Při stisku znaménka, se číslo v Editu uloží do proměnné cislo1 a znaménko na buttonu se uloží do znamenko. Poté se prakticky totéž provede podruhé, ovšem bez toho, abychom klikli na znaménko. Místo toho se klikne na "rovná se" a právě tady mám problém. Potřeboval bych do Editu vypsat součet čísel cislo1 a cislo2 podle hodnoty v proměnné znamenko. A tady se mi vypisuje hláška při kompilaci.

Je mi třináct a v Delphi jsem začal asi před půlhodinou tak na mne berte ohledy. :)

#1 Yohaku
Nejspíš půjde o chybu přetypování. Ale bez přesného znění chyby a případně zdrojáku to jen odhaduju.

#2 mjseven
Ano, o tom právě také přemýšlím...

Chybová hláška při kompilaci:

unit1.pas(107,38) Error: Incompatible type for arg no. 1: Got "Real", expected "QWord"

Řádek 107 ve zdrojovém kódu:

procedure TForm1.alltoClick(Sender: TObject);
begin
  celkem := cislo1+cislo2;
  vysledek.Caption := IntToStr(celkem); // 107
end;   

Deklarace proměnných:

    var cislo1, cislo2, celkem: real;
    var znamenko : char;  

Vážně mě za takovouhle chybu nezabijte, začal jsem před pár hodinami. :D

Nekompatibilní typ parametru č. 1: Zadán "Real", očekáván "QWord".

IntToStr převádí celá čísla. Zkus FloatToStr, nebo tak něco.

případně můžeš použít  

Vysledek.Caption := Format('%d', [Celkem]);

pro přesný popis funkce Format mrkni do helpu, 

A jo, děkuji, taková hloupá chyba... Mockrát děkuji! :D