StringGrid i Memo komponente - citanje i upis

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

E ovako...Moram napraviti program koji se sluzi komponentama StringGrid i Memo,a koji ce od brojeva koji su uneti u StringGrid "truncovati" i u Memo ispisati samo cele brojeve.Kako ce mi glasiti procedura Buttona u tom slucaju?

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Nije poenta da ti se da gotovo rešenje. Kreni, pa kad zapne, pitaj.

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

U tome i jeste stos,sto ne znam,nazalost...Nemam ideju.
Ne bih trazio pomoc da znam,sto je i logicno...

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Sto se tice StringGrid-a, upis i citanje mozes da radis preko svojstva Cells koji je definisan kao:

StringGrid1.Cells[x,y] gde je X broj kolone, a Y broj vrste u string gridu. Treba napomenuti i to da ove vrednosti krecu od 0, a ne od 1.

Ukoliko na primer, zelis da upises nesto u celiju u trecoj koloni, i prvom redu to ces uraditi naradbom:

StringGrid1.Cells[3,1]:='TEST'; StringGrid1.Cells[3,1]:='3';

Ono sto upisujes, moras da navedes izmedju navodnika, jer je u pitanju string.

Sto se tice Memo komponente, njena osnovna svojsta su linije kojima "upravljas" preko svojstva Lines. Ovu komponentu mozes da shvatis kao vise numerisanih Edit komponenti. Da bi nesto upisao u Memo to mozes da uradis na sledeci nacin:

Memo1.Lines[1]:='TEST'; Memo1.Lines[3]:='TEST3';

U uglastim zagradava navodis red u memo-u, u koji upisujes ili iz kojeg citas.

Sto se tice tvog primera, potrebno ti je da iscitavas StringGrid, zaokruzis vrednosti i zatim upises u Memo.

Iscitavanje StringGrida mozes da realizujes putem dve for petlje.
Ukoliko imas StringGrid dimenzija 5 x 5, iscitavanje ces uraditi na sledeci nacin:

k:=0;   {Red u koji se upisuje u Memo, krece od 0} for i:=0 to 4 do     {Promenljiva koja oznacava kolonu}     for j:=0 to 4 do         {Promenljiva koja oznacava vrstu} Begin ucitano:=StringGrid.Cells[i,j];  {Ovde zavrsava deo za sa ucitavanjem} {U ovoj liniji realizuj kod koji ce da zaokruzuje broj, ali pre toga je potrebno string konvertovati u broj } Memo.Lines[k]:=ucitani;       {Upis zaokruzenog broja u Memo, pre toga potrebna konverzija u string} k:=k+1; end;

Evo, tvoj kod bi otprilike trebao da izgleda ovako.
K je promenljiva koja ce da cuva tekuci red Memo komponente u koji treba da se upisuje.

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Stani sad.Ti ga bas isecka,ali me interesuje kako da ubacim ovo trunc koje bi zaokruzivalo brojeve.Program bi izgledao ovako: Sa leve strane imam taj StringGrid u kome unosim razne brojeve i cele i decimalne i negativne,a sa desne imam Memo u kojoj kad pritisnem dugme Odradi treba da izadju samo celi brojevi.Jel ti nije problem da mi napises onako pesacki- Procedure Button1Click...jer ja sam veliki bukvalista.

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Ako pogledas ranije teme, videsec da niko nije dobio gotov kod, a da se nije potrudio. NuLLCoDe ti je detaljno objasnio postupak, tvoj ceo zadatak se sveo na prevodjenje stringa u broj i zaokruzivanje. Ako ti je problem da prevedes string u broj pogledaj StrToInt, StrToIntDef, TryStrToInt i slicne funkcije u Help-u, mada mislim da ces se snaci i bez njega.

Kreni da radis pa se javi kad zapnes.

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

trunc(StrToInt('123'))

I ostalo ti je sve dato...samo uklopi....