[es] - kako da napravim da mi program ima vise strana u delphiju, a ne samo jednu?

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739

+92 Profil

Re: kako da napravim da mi program ima vise strana u delphiju, a ne samo jednu?

^{10.01.2013. u 19:25 - pre 137 meseci}

> zelim da mi program ima vise stranica a ne samo jednu,

Misliš na forme? Prosto dodaš novu, File/New->Form.

> i imam jos jedno pitanje, kako da kada kopiram broj od hiljadu cifara u caption labela da ide u vise reda a ne u samo jedan horizontalni?hvala svima unapred na pomoci

Postavi WordWrap property na True i povećaj mu visinu.

Do not be a help vampire (http://slash7.com/pages/vampires), use the google.

How to ask questions the smart way:
http://www.catb.org/~esr/faqs/smart-questions.html
http://solair.eunet.rs/~fangor...stions/smart-questions.sr.html

Odgovor na temu

goran995
omladinski fudbaler
crvena zvezda

Član broj: 310789
Poruke: 8
212.200.71.*

Profil

Re: kako da napravim da mi program ima vise strana u delphiju, a ne samo jednu?

^{10.01.2013. u 20:26 - pre 137 meseci}

ovo sto ste mi rekli, ja sam stavio wordwrap na true i podesio visinu ali koju god visinu stavim ono ide u dva reda a meni treba vise...evo u stvari sta ja zelim da uradim,

pitao sam na dosta i domacih i stranih foruma i neki kazu da je moguce a neki da nije moguce...

program da ima dvanaest strana, medju njima uvodnu i zakljucnu...uvodna strana gde ce biti objasnjenje za koriscenje, a zakljucna gde ce izlaziti rezultat...na ovih 10 strana da se nalazi deset labela sa deset nizova brojeva koje sam osmislio, i pored njih dva checkboxa na svakoj stranici koja ce se stiklirati u zavisnosti da li broj koji je korisnik zamislio se nalazi u tim nizovima ili ne...stikliranjem jednom od tih checkboxa da program predje na sledecu stranu, i na kraju da kada dodje do poslednje strane u editu izadje broj koji je korisnik zamislio..e sad, kako? tu treba da izadje resenje, a ono se sastoji kad se saberi sve prvi brojevi iz nizova gde je stikliran prvi checkbox.

da li je ovo moguce, a ako nije, mozete li mi reci gde gresim i sta treba popraviti?

Odgovor na temu

Predrag Supurovic
Pedja YT9TP
Užice

Član broj: 157129
Poruke: 6279

Sajt: pedja.supurovic.net

+1570 Profil

Re: kako da napravim da mi program ima vise strana u delphiju, a ne samo jednu?

^{10.01.2013. u 20:31 - pre 137 meseci}

Ja bih za to koristio Tabove.

http://pedja.supurovic.net - http://wireless.uzice.net - Besplatni .RS domeni - Mikrotik uputstva - YT9TP - OpenStreetMap Srbija

Odgovor na temu

goran995
omladinski fudbaler
crvena zvezda

Član broj: 310789
Poruke: 8
212.200.71.*

Profil

Re: kako da napravim da mi program ima vise strana u delphiju, a ne samo jednu?

^{10.01.2013. u 20:39 - pre 137 meseci}

ne razumem ovo za tabove..nisam bas pocetnik u delphiju, ali nisam ni neko da mogu da budem profesor...ako moze neko malo dublje objasnjenje kako da uradim ovo sto zelim. hvala unapred, izgleda da sam konacno na pravom mestu

Odgovor na temu

popmilan76

Član broj: 295089
Poruke: 1337
*.dynamic.sbb.rs.

+5 Profil

Re: kako da napravim da mi program ima vise strana u delphiju, a ne samo jednu?

^{10.01.2013. u 21:29 - pre 137 meseci}

cega deset strana,jel deset formi na kojima su tekstovi,ili deset reporta na kojima su textovi....

Odgovor na temu

goran995
omladinski fudbaler
crvena zvezda

Član broj: 310789
Poruke: 8
212.200.71.*

Profil

Re: kako da napravim da mi program ima vise strana u delphiju, a ne samo jednu?

^{10.01.2013. u 21:34 - pre 137 meseci}

da, deset formi..na svakoj formi se nalazi jedan label sa nizom brojeva i po dva checkboxa

Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739

+92 Profil

Re: kako da napravim da mi program ima vise strana u delphiju, a ne samo jednu?

^{10.01.2013. u 23:03 - pre 137 meseci}

> ovo sto ste mi rekli, ja sam stavio wordwrap na true i podesio visinu ali koju god visinu stavim ono ide u dva reda a meni treba vise...evo u stvari sta ja zelim da uradim,

Label ce prelomiti tekst na osnovu njegove širine i visine kao i teskta (reči) koje prikazuje. Ako želiš da ručno kontrolišeš prelom onda možeš ubaciti CRLF (znak za novi red), npr:

Code:

  Label1.WordWrap := True;
  Label1.Height := 400;
  Label1.Caption := 'Prvi red' + #13#10 + 'Drugi red' + #13#10 + 'Treci red';

> ili ne...stikliranjem jednom od tih checkboxa da program predje na sledecu stranu

U OnClick event handleru tog ckeckboxa upišeš kod koji otvara novu formu.

> , i na kraju da kada dodje do poslednje strane u editu izadje broj koji je korisnik zamislio..e sad, kako? tu treba da izadje resenje, a ono se sastoji kad se saberi sve
> prvi brojevi iz nizova gde je stikliran prvi checkbox.

Recimo pre nego otvoriš novu formu upišeš u neki globalni stringlist taj broj i tako redom za svih 10 formi i na kraju samo prođeš kroz te brojeve i uradiš šta treba. String list možeš ovako deklarisati:

// Ovo staviš u interface sekciju glavne forme ili nekog drugog unita koji će svi ostali uniti koristiti.
var
GlobalniBrojevi: TStrings;

Promenljivu praviš u OnCreate eventu glavne forme na sledeći način GlobalniBrojevi := TStringList.Create;

Odgovor na temu

goran995
omladinski fudbaler
crvena zvezda

Član broj: 310789
Poruke: 8
212.200.71.*

Profil

Re: kako da napravim da mi program ima vise strana u delphiju, a ne samo jednu?

^{11.01.2013. u 10:05 - pre 137 meseci}

ovo za label sto ste mi sada objasnili rucno radi, mada ne znam da li mogu sve rucno posto sigurno imam hiljadu najmanje preloma da napravim...a ovo, evo ja podesim npr na 400 i stavim na word wrap i on prvi red prelomi na 400 i posle sve ostalo stavi u drugi red, ali mogu ja i sve rucno iako ima dosta mada bi mi ovako bilo lakse

-U OnClick event handleru tog ckeckboxa upišeš kod koji otvara novu formu.

e, ovo sto ste mi rekli za onclick evetn u checkboxu, taj kod sam ja i trazio ali ne znam ga pa ako bi mogli da mi napisete kod i da mi se otvori nova forma..ovo bi mi bilo super ako biste mi napisali kod jer ja sam vec mislio da to ne moze pa sam nasao neku komponentu array ali ne snalazim se u njoj jer prvi put je koristim....

-Recimo pre nego otvoriš novu formu upišeš u neki globalni stringlist taj broj i tako redom za svih 10 formi i na kraju samo prođeš kroz te brojeve i uradiš šta treba. String list možeš ovako deklarisati

e, ovo zadnje me niste razumeli ili ja ne shvatam sta mi zelite reci, taj konacni broj ce uvek biti drugaciji i on treba da se formira kad se saberu svi prvi brojevi nizova gde je prvi checkbox stikliran...znaci, ja koliko se razumem, ne mogu dati naredbu da se sabira broj iz niza labela, oni su odvojeni zarezom pa samim tim div i mod ne vaze...razmislao sam da stavim posebnu grupu labela gde bih upisao prve brojeve nizova i onda za povezao checkbox-ove i labele ali bi mi to unistlio ceo program..a isto tako, posto ovo sto pravim, ako bih radio rucno, tj da ne postavljam uslov da se sabiraju prvi brojevai samo prvih stikliranih nizova, postoji 36 789 kombinacija, za koje ce mi trebati mnogo vremena da uradim, pa cak nije ni sigurno da necu staviti dve iste kombinacie i ona sve dzaba...

molio bih, ako ne smetam da mi ove stvari objasnite, i vi sto ste mi vec pisali na temi a i ostali koji mogu..

Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739

+92 Profil

Re: kako da napravim da mi program ima vise strana u delphiju, a ne samo jednu?

^{11.01.2013. u 17:31 - pre 137 meseci}

> ovo za label sto ste mi sada objasnili rucno radi, mada ne znam da li mogu sve rucno posto sigurno imam hiljadu najmanje preloma da napravim...a ovo, evo ja podesim
> npr na 400 i stavim na word wrap i on prvi red prelomi na 400 i posle sve ostalo stavi u drugi red, ali mogu ja i sve rucno iako ima dosta mada bi mi ovako bilo lakse

Ako automatski prelom ne radi, onda je greška do tebe. Možda nemaš spejsove koji bi windowsu rekli gde da prelomi reč. Probaj ovaj kod i videćeš da prevod ide automatski.

Code:

// ubaci neki button na formu i stavi u OnClick event tog buttona
var
  lbl: TLabel;
begin
  lbl := TLabel.Create(Self);
  lbl.Parent := Self;
  lbl.Top := 50;
  lbl.Left := 50;
  lbl.WordWrap := True;
  lbl.Height := 400;
  lbl.Caption := 'Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris nisi ut aliquip ex ea commodo consequat.';

> e, ovo sto ste mi rekli za onclick evetn u checkboxu, taj kod sam ja i trazio ali ne znam ga pa ako bi mogli da mi napisete kod i da mi se otvori nova forma..ovo

Ti napravi svih tih 10 formi ili koliko ti treba i onda kada trebaš novu da prikažeš ili pozovi Form2.Show (ako se forme automatski kreiraju) ili piši:

Code:

var
  frm: TForm2;
begin
  frm := TForm2.Create(nil);
  try
    frm.ShowModal;
  finally
   frm.Free;
  end;

-Recimo pre nego otvoriš novu formu upišeš u neki globalni stringlist taj broj i tako redom za svih 10 formi i na kraju samo prođeš kroz te brojeve i uradiš šta treba. String list možeš ovako deklarisati

> stikliran...znaci, ja koliko se razumem, ne mogu dati naredbu da se sabira broj iz niza labela, oni su odvojeni zarezom pa samim tim div i mod ne vaze...razmislao
> sam da stavim posebnu grupu labela gde bih upisao prve brojeve nizova i onda za povezao checkbox-ove i labele ali bi mi to unistlio ceo program..a isto tako,

Ne pratim baš najbolje opis procesa. Ako su ti brojevi u stringu a te brojeve trebaš sabrati, onda prvo string pretvori u broj, putem StrToInt funkcije.
Ako string sadrži više brojeva razdvojenih zarezom onda moraš prvo izdvojiti pojedinačne brojeve pa ih pretvoriti u string. Pogledaj www.elitesecurity.org/t453039 za diskusiju o razdvajanju stringova.

Odgovor na temu

goran995
omladinski fudbaler
crvena zvezda

Član broj: 310789
Poruke: 8
212.200.71.*

Profil

Re: kako da napravim da mi program ima vise strana u delphiju, a ne samo jednu?

^{11.01.2013. u 18:16 - pre 137 meseci}

-Ako automatski prelom ne radi, onda je greška do tebe. Možda nemaš spejsove koji bi windowsu rekli gde da prelomi reč. Probaj ovaj kod i videćeš da prevod ide automatski.

ok, hvala vam na ovom prvom objasnjenju i ono radi...to sad razumem

-Ti napravi svih tih 10 formi ili koliko ti treba i onda kada trebaš novu da prikažeš ili pozovi Form2.Show (ako se forme automatski kreiraju) ili piši:

ovaj kod sam stavio i izbacuje mi gresku...u stvari verovatno negde gresim, tako da nije do koda ali ne znam gde...znaci ovako, meni treba deset labela i 20 checkboxa i da svaka naredna stranica nasledjuje trenutnu kad se izabere jedan od dva checkboxa...znaci, ja sam mislio ovako, da stavim naredbu na onclick checkbox da se pojavi sledeca forma ali ne znam kako to...uopste mi nisu ove multiple forms objasnjenja na delphi-evom sajtu gde objasnjavaju, jer meni treba da dok sredjujem program imam sve te forme a kad se program zavrsi i pocne koristi da u jednom trenutku bude samo jedna forma...

strtoint funkciju znam i razumem je, ali meni je jedan od nizova ovaj:
128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143,144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159,160,161,162,163,164,165,166,167,168,169,170,171,172,173,174,175,176,177,178,179,180,181,182,183,184,185,186,187,188,189,190,191,192,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207,208,209,210,211,212,213,214,215,216,217,218,219,220,221,222,223,224,225,226,227,228,229,230,231,232,233,234,235,236,237,238,239,240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255,384,385,386,387,388,389,390,391,392,393,394,395,396,397,398,399,400,401,402,403,404,405,406,407,408,409,410,411,412,413,414,415,416,417,418,419,420,421,422,423,424,425,426,427,428,429,430,431,432,433,434,435,436,437,438,439,440,441,442,443,444,445,446,447,448,449,450,451,452,453,454,455,456,457,458,459,460,461,462,463,464,465,466,467,468,469,470,471,472,473,474,475,476,477,478,479,480,481,482,483,484,485,486,487,488,489,490,491,492,493,494,495,496,497,498,499,500,501,502,503,504,505,506,507,508,509,510,511,640,641,642,643,644,645,646,647,648,649,650,651,652,653,654,655,656,657,658,659,660,661,662,663,664,665,666,667,668,669,670,671,672,673,674,675,676,677,678,679,680,681,682,683,684,685,686,687,688,689,690,691,692,693,694,695,696,697,698,699,700,701,702,703,704,705,706,707,708,709,710,711,712,713,714,715,716,717,718,719,720,721,722,723,724,725,726,727,728,729,730,731,732,733,734,735,736,737,738,739,740,741,742,743,744,745,746,747,748,749,750,751,752,753,754,755,756,757,758,759,760,761,762,763,764,765,766,767, 896,897,898,899,900,901,902,903,904,905,906,907,908,909,910,911,912,913,914,915,916,917,918,919,920,921,922,923,924,925,926,927,928,929,930,931,932,933,934,935,936,937,938,939,940,941,942,943,944,945,946,947,948,949,950,951,952,953,954,955,956,957,958,959,960,961,962,963,964,965,966,967,968,969,970,971,972,973,974,975,976,977,978,979,980,981,982,983,984,985,986,987,988,989,990,991,992,993,994,995,996,997,998,999,1000
i sad ovaj niz se nalazi u jednom labelu na jednoj formi i ima pored dva checkboxa...ako korisnik klinke na prvi checkbox, u editu konacnom u zbir treba da udje 128 kao prvi clan ovog niza i tako za sve ostale nizove gde je izabran prvi checkbox

u stvari, evo sad razmisljam, ne moram da imam sve ove strane, da li ja mogu da sve radim na jednoj formi, tako sto kad korisnik stiklira jedan od dva checkboxa, taj label zameni sledece a na checkboxovi ostanu i onda kad se klikne na prvi checkbox za svaki label ide u resenje zbir?

_{[Ovu poruku je menjao goran995 dana 11.01.2013. u 20:03 GMT+1]}

Odgovor na temu

captPicard
programer
more i planine

Član broj: 216084
Poruke: 1119

+19 Profil

Re: kako da napravim da mi program ima vise strana u delphiju, a ne samo jednu?

^{11.01.2013. u 19:59 - pre 137 meseci}

Da li možeš malo bolje objasniti šta želiš konkretno napraviti? Opiši proces. Odatkle si dobio/dobivaš taj niz, koji rezultat moraš dobiti?

A prijelom ti ne radi radi ovoga šta kolega Savkic kaže, nemaš space-a koji bi rekao gdje je prijelom. Može se i to riješiti ali prije objasni šta želiš.

Odgovor na temu

goran995
omladinski fudbaler
crvena zvezda

Član broj: 310789
Poruke: 8
212.200.71.*

Profil

Re: kako da napravim da mi program ima vise strana u delphiju, a ne samo jednu?

^{11.01.2013. u 20:18 - pre 137 meseci}

ja sam sse trudio da sto bolje objasnim...izvinjavam se ako nisam uspeo u tome...te nizove sam ja licno napravio, postoji deset tih nizova...svaki niz da bude u jednoj labeli i pored labele dva checkboxa..., na kraju u editu na kraju kao resenje treba da bude zbir svih prvih brojeva iz svakog niza gde je stikliran prvi checkbox...
evo postavio sam i sliku kao dodatno objasnjenje

ovako, posle cele noci i pokusavanja i trazenja, ja sam uspeo ali na kraju je ispalo da mi ovo sa vise formi ne valja jer sam ja to zamisljao drugacije, tako da bih sad da uradim sve na jednoj formi tako da se svi ovi procesi desavaju na jednoj formi, ali ne znam kako

_{[Ovu poruku je menjao goran995 dana 12.01.2013. u 11:06 GMT+1]}

da ne otvaram novu temu ali imam jos jedno pitanje za drugi program s tim da ovaj nisam uspeo da napravim, a valjda cu uspeti ako mi neko jos malo pomogne
novi program je naizgled jako jednostavan, ali posto ja ne znam za naredbu print kako se koristi, ako neko moze da mi uradi programce ovo i posalje projekat pa bi ja kad vidim na koji se nacin to radi, posle radio mnogo slozenije

_{[Ovu poruku je menjao goran995 dana 12.01.2013. u 20:55 GMT+1]}

_{[Ovu poruku je menjao goran995 dana 12.01.2013. u 20:57 GMT+1]}

Prikačeni fajlovi

Untitled.jpg - 172.24k

Untitled1.png - 92.74k

Untitled3.png - 80.8k

Odgovor na temu