Pomoc oko tipa podataka

[ saladin2809 @ 13.02.2012. 09:49 ] @

Pozdrav svima,
Pokusavam da pomnozim dva broja iz dva Edita. to mi radi kada su celi brojevi u pitanju ali nikako nece kad su decimalni brojevi, ne znam koji tip podatka da stavim. Molim za pomoc.
Pozdrav.

[ captPicard @ 13.02.2012. 10:11 ] @

extended

[ saladin2809 @ 13.02.2012. 10:24 ] @

Problem mi je kad pretvaram string to extender!
Kako to da resim, evo kako sam ja pokusao
Var ukupno: extended;
begin
ukupno:= (StrToFloat(edit10.Text) * StrToFloat(Edit8.Text));
Label3.Caption:= FloatToStr(ukupno);
end;

[ reiser @ 13.02.2012. 11:33 ] @

Pa reci u cemu je problem, jel izbacuje los rezultat ili kompajler javlja neku gresku ?

Meni ovo radi:

Code:

var
  a, b : Extended;
begin
  a := 1.13215;
  b := 1.54456;
  Label1.Caption := FloatToStr(a * b);
end;

U svakom slucaju, probaj sa Real ili Double umesto Extended.

[ saladin2809 @ 13.02.2012. 11:48 ] @

Evo proradilo je :)
Hvala Vam.
Pozdrav.

[ saladin2809 @ 13.02.2012. 13:22 ] @

Ako moze samo jos nesto.
Pokusavam da povezem dva uslova:
Za prvi uslov sam uradio QUERY a drugi uslov mi se nalazi u polju EDIT.
Moze li neka pomoc kako da povezem ova dva uslova, da mi broj dobijen u QUERY uporedi sa brojem koji se nalazi u EDIT polju.
Pozdrav/

evo i kako je kod mene

QArtikli.Close;
QArtikli.SQL.Clear;
QArtikli.SQL.Add('select *');
QArtikli.SQL.Add('from artikli');
QArtikli.SQL.Add('where artikli.faktura') //e sad ovde trebam da stavim text iz edit polja.
QArtikli.Open;

_{[Ovu poruku je menjao saladin2809 dana 13.02.2012. u 14:48 GMT+1]}

[ captPicard @ 13.02.2012. 22:53 ] @

Code:

SelectSQL.Text := 'select polje from tablica where trazim_polje = ' + QuotedStr(Edit1.Text);

ili još bolje:

Code:

SelectSQL.Text := 'select polje from tablica where trazim_polje = :param';
Params[0].AsString := Edit1.Text;

[ saladin2809 @ 14.02.2012. 09:54 ] @

Radi šefe, Hvala :)