MyCity » Pascal -> Delphi » format

format

Napisano na dan: 26.2.2007
1

format
Sledeća strana Pagination

Idi na vrh

Poslao: 26 Feb 2007 12:44
Idi na vrh
offline
  • Pridružio: 26 Feb 2007
  • Poruke: 220
  • Gde živiš: Novi Sad

Pomagajte ako znate kako da formatiram polje u DBGrid-u tako da ako polje ima npr 8 karaktera ja unesem 3 on mi doda nule ispred.Samo mi nemojte reci da je sa funkcijom Format jer ne znam gde da je uturim.HELP zlopatim se vec 10 dana sa tim.



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Poslao: 26 Feb 2007 12:54
Idi na vrh
offline
  • Đuro Glumac
  • dipl. ing. informatike
  • Pridružio: 08 Feb 2004
  • Poruke: 3640
  • Gde živiš: ApAtIn

Tu osobinu u DBGridu nemas ali mozes lako sam da je napravis.

While Length(s)<8 do
s:='0'+s;

Svaki string bi trebao pre ispisa u DBGrid da formatiras ovako i svi ce biti duzine 8 karaktera. Jesi na to mislio?



Poslao: 26 Feb 2007 13:36
Idi na vrh
offline
  • Pridružio: 26 Feb 2007
  • Poruke: 220
  • Gde živiš: Novi Sad

Pa moze i to ali na koji dogadjaj da dodam kod.Hvala

Poslao: 26 Feb 2007 13:43
Idi na vrh
offline
  • Đuro Glumac
  • dipl. ing. informatike
  • Pridružio: 08 Feb 2004
  • Poruke: 3640
  • Gde živiš: ApAtIn

Pa daj malo vise informacija sta upisujes u DBGrid i odakle citas? Pre upisa u DBGrid dodas taj kod.

Poslao: 26 Feb 2007 21:50
Idi na vrh
offline
  • eca  Female
  • Zaslužni građanin
  • Pridružio: 24 Feb 2007
  • Poruke: 631

Imam isti problem, t.j. kako pri unosu novih rekorda u tabelu da ne kucam gomilu nula u kataloskim brojevima.
Baza je Access, a na formi imam standardne kontrole:DataSource, AdoTable i AdoConnection. Podatke prikazujem u DBGridu.

Apsolutni sam pocetnik i pojma nemam gde ide lepi mali kod koji je NullCoDe napisao.

Pomoc!

Poslao: 26 Feb 2007 22:47
Idi na vrh
offline
  • Đuro Glumac
  • dipl. ing. informatike
  • Pridružio: 08 Feb 2004
  • Poruke: 3640
  • Gde živiš: ApAtIn

@eca

Pogledaj funkciju FormatFloat u helpu.

Poslao: 26 Feb 2007 23:19
Idi na vrh
offline
  • eca  Female
  • Zaslužni građanin
  • Pridružio: 24 Feb 2007
  • Poruke: 631

Probacu! Ako uspe javicu kako, ako ne zapomagacu...

Poslao: 27 Feb 2007 00:43
Idi na vrh
offline
  • Pridružio: 08 Jan 2007
  • Poruke: 279
  • Gde živiš: Srbija

Ako sam dobro razumeo, pri unosu npr. nekog broja u TEdit, MaxLenght = 8, treba da se ispred unetog broja čija je dužina manja od 8 karaktera ispišu nule!?!

Za TEdit treba property MaxLenght postaviti na vrednost "8" te ispisati sledeći kod:
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;   Shift: TShiftState); var s: string; begin  if (Key = VK_RETURN) then   while Length(Edit1.Text)<8 do     Edit1.Text:='0'+Edit1.Text; end;
Naravno, ovo je jedna od opcija ako sam dobro razumeo problem, ne i najelegantnije rešenje.

Pozdrav.

Poslao: 27 Feb 2007 02:37
Idi na vrh
offline
  • Emil Beli
  • Pridružio: 03 Jan 2005
  • Poruke: 2990
  • Gde živiš: Beograd

Nullcode je dao jedino pravilno resenje: funkcija FormatFloat

Poslao: 27 Feb 2007 10:28
Idi na vrh
offline
  • Đuro Glumac
  • dipl. ing. informatike
  • Pridružio: 08 Feb 2004
  • Poruke: 3640
  • Gde živiš: ApAtIn

A NuLLCoDe-u je na tu funkciju nedavno ukazao Beli. Mr. Green

Jedino sto svaki upis u DBGrid prethodno mozras da formatiras, ne mozes nakon upisa sa FormatFloat da formatiras kolonu u DBGridu.

MyCity » Pascal -> Delphi » format

Ko je trenutno na forumu
 

Ukupno su 932 korisnika na forumu :: 39 registrovanih, 3 sakrivenih i 890 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: alek_bre, ArchaBasha, Baba_Yagi_Antena, babaroga, Bickoooo, boromir, Bubimir, BZ, Darth Wader, deLacy, Desmond, djboj, Djordje__________, GreenMan, havoc995, HrcAk47, Jiu Kellah, Jovan.D, Kobrim, kolateralnasteta, Krusarac, Kuroje, Lieutenant, marewfc, mige84, NMNJ, Novakomp, opt1, Polifon, PrincipL, sekretar, Shadow soldier, spalev, tooljan, VJ, vobo, vrlenija, Vzor50, zlaya011