[es] - prijava greske, nestala mi glavna forma!!!!!!

Bojann
Zrenjanin

Član broj: 13255
Poruke: 217
*.dialup.neobee.net.

Profil

prijava greske, nestala mi glavna forma!!!!!!

^{28.03.2005. u 20:01 - pre 232 meseci}

Evo ovako:
radim neki program gde postoji glavna forma i dosta mdichild formi. Sve je lepo funkcionisalo u radu do danas. Naime nemam pojam sta sam uradio i da li sam nesto uradio uglavnom kada sam danas otvorio program da nastavim rad poceo je da prijavljuje gresku:

Code:
Error creating form: line too long on line 19140

I nestala mi je glavna forma, imam samo njen kod u pascalu ali mi nema forme i ne mogu je dobiti. E sad da pokusam da rucno editujem dfm fajl nije bas pametno, jer je oko 3 mb zbog importovanih slika(tu je negde i greska).

Ljudi pomagajte. Poslednju kopiju rada sam napravio pre 5-6 dana. Spasite me ponovnog rada.

Odgovor na temu

DeYo
Dejan Vukmirovic
developer @ Mogul
Pozarevac/Bgd/Stockholm

Član broj: 36771
Poruke: 85
*.etf.bg.ac.yu.

Sajt: www.linkedin.com/in/dejan..

Profil

Re: prijava greske, nestala mi glavna forma!!!!!!

^{28.03.2005. u 20:06 - pre 232 meseci}

probaj da preimenuje mainform.bak u mainform.pas (ili kako ti se vec zove glavna forma), oba fajla su u istom direktorijumu.

to ti je kopija pre poslednjeg snimanja tj. pretposlednja verzija koju si snimo. niko ne moze da garanutuje da ce to proraditi ali... daj sta das, zar ne?

btw. umesto sto cuves slike u formi koristi prilikom OnCreate eventa nesto tipa

Code:
Image1.Picture.LoadFromFile(ExtractFilePath(Application.Exename)+'ime_slike.bmp')

Odgovor na temu

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949

+10 Profil

Re: prijava greske, nestala mi glavna forma!!!!!!

^{28.03.2005. u 20:48 - pre 232 meseci}

Probaj da nadjes 19140 liniju i vidi koliko ima slova u redu. Delphi ima neko ogranicenje (ne znam tacno koje) u vezi sa duzinom reda. Kad nadjes taj red samo ga prepolovi ili ako treba podeli na 5-6 redova i trebalo bi da ti to pomogne.

P.S.
Sta si uradio pre nego sto je poceo da ti prijavljuje tu gresku?

Play Store

Odgovor na temu

Bojann
Zrenjanin

Član broj: 13255
Poruke: 217
*.dialup.neobee.net.

Profil

Re: prijava greske, nestala mi glavna forma!!!!!!

^{29.03.2005. u 00:15 - pre 232 meseci}

ali ta linija je slika verovatno. Kako ja tu mogu da uticem? ako obrisem deo obrisacu u stvari deo slike. Gde da je editujem? necu valjda u notepadu?

Odgovor na temu

Bojann
Zrenjanin

Član broj: 13255
Poruke: 217
*.dialup.neobee.net.

Profil

Re: prijava greske, nestala mi glavna forma!!!!!!

^{29.03.2005. u 00:16 - pre 232 meseci}

Citat:

DeYo: probaj da preimenuje mainform.bak u mainform.pas (ili kako ti se vec zove glavna forma), oba fajla su u istom direktorijumu.

to ti je kopija pre poslednjeg snimanja tj. pretposlednja verzija koju si snimo. niko ne moze da garanutuje da ce to proraditi ali... daj sta das, zar ne?

btw. umesto sto cuves slike u formi koristi prilikom OnCreate eventa nesto tipa

Code:
Image1.Picture.LoadFromFile(ExtractFilePath(Application.Exename)+'ime_slike.bmp')

ali ja imam pas fajl i on je ok, ali ne radi forma odnosno verovatno dfm? a i problem je u tome sto ja nemam bak jer briem sve repove odnosno fajlove koji pocinju sa ~

Odgovor na temu

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949

+10 Profil

Re: prijava greske, nestala mi glavna forma!!!!!!

^{29.03.2005. u 00:19 - pre 232 meseci}

U dfm fajlu je ta slika malo drugacije predstavljena. Koriste se samo odredjeni ASCII znaci tako da mozes slobodno da je preseces na vise delova.
Npr. imas ovakav red:

dhjjaskdh38494u234$@$vb423%$@54fklsdkjfksljr4io5f4rjekrc#$#F%ck6gV54

ti slobodno mozes da editujes dfm fajl da taj red izgleda ovako

dhjjaskdh38494u234$
@$vb423%$@54fklsdkjf
ksljr4io5f4rjekrc#$#
F%ck6gV54

to ne bi trebalo da smeta, ali ipak za svaki slucaj napravi rezervnu kopiju originalnog dfm fajla.

P.S.
Ovo sam probao u Delphi 7 i radi bez problema.

Play Store

Odgovor na temu

Bojann
Zrenjanin

Član broj: 13255
Poruke: 217
*.dialup.neobee.net.

Profil

Re: prijava greske, nestala mi glavna forma!!!!!!

^{29.03.2005. u 00:21 - pre 232 meseci}

U kom programu da ga editujem? Notepad ne broji redove i ne znam koji je to red?

Odgovor na temu

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949

+10 Profil

Re: prijava greske, nestala mi glavna forma!!!!!!

^{29.03.2005. u 00:23 - pre 232 meseci}

Ja sve editujem u Delphi IDE-u. Tu imas i broj reda, broj kolone... bas to sto ti je potrebno. Samo promeni extenziju dfm fajla u recimo txt, promeni ga u Delphi-u i vrati extenziju na dfm.

Play Store

Odgovor na temu

Bojann
Zrenjanin

Član broj: 13255
Poruke: 217
*.dialup.neobee.net.

Profil

Re: prijava greske, nestala mi glavna forma!!!!!!

^{29.03.2005. u 00:44 - pre 232 meseci}

Ok, nasao sam i stvarno je dugacka i presekao sam je nekoliko puta, vratio ekstenziju ii sad dobijam poruku o gresci:

Code:
Error creating form:invalid binary value on line 19140

Odgovor na temu

_v!rus_
BGD

Član broj: 40451
Poruke: 313
*.vdial.verat.net.

+1 Profil

Re: prijava greske, nestala mi glavna forma!!!!!!

^{29.03.2005. u 00:47 - pre 232 meseci}

Moguce da si prelomio liniju "u sred" 24-bitne RGB vrednosti... mada to je samo "moguce", ne znam da li Delphi tako cita piksele...

Odgovor na temu

Bojann
Zrenjanin

Član broj: 13255
Poruke: 217
*.dialup.neobee.net.

Profil

Re: prijava greske, nestala mi glavna forma!!!!!!

^{29.03.2005. u 00:52 - pre 232 meseci}

Pa tesko je pogoditi gde da prelomi jer su sve binarni znaci, odnosno sve kockice, a red je toliko dugacak da ga treba prelomiti jedno 10 puta

Odgovor na temu

_v!rus_
BGD

Član broj: 40451
Poruke: 313
*.vdial.verat.net.

+1 Profil

Re: prijava greske, nestala mi glavna forma!!!!!!

^{29.03.2005. u 01:55 - pre 232 meseci}

Nesto sad razmisljam, kako uopste prelomiti liniju u kojoj su podaci o pikselima?
Naime, Delphi u DFM fajl zapisuje podatke o svakom pikselu ponaosob. Znak za prelom reda je #10#13. Ako se mogu prelamati redovi u dfm fajlu u sekciji koja sadrzi podatke o pikselima, kako se onda predstavlja piksel koji bas ima npr. #10#13#54? Moguce da dodavanje preloma reda pravi nove piksele u bitmapi, pa se to onda ne slaze sa Width*Height*3 = broj bajtova strukturom, pa zato izbacuje gresku.

Aj sad cu kod sebe da napravim formu sa slikom, pa cu da exprimentisem...

[edit]
Izgleda da delphi zapisuje pixele u obliku 64 karaktera po redu DFM-a, gde su karakteri hex vrednosti svakog bajta (time je glupo ono sto sam napisao sa #10#13#54, mada bi im tako slike zauzimale duplo manje mesta DFM-u, a tako su i radili u ranijim verzijama gde je dfm bio u binarnom obliku ;).

Treba samo da prelomis redove NA PARNOM broju karaktera, da ne prelomis bajt (predstavljen hex sa dva karaktera). Onda ce da proradi. Ne mora da bude 64 karaktera (tj. 32 bajta slike) po jednom redu u DFM-u, ali mora da bude paran broj karaktera po redu. Imas u donjem-desnom uglu editora r.br. kolone, samo vidi da poslednji karakter u redu ima istu parnost kao i prvi (ne moras da brojis :) i to je to.

Odgovor na temu

Milos D
Beograd

Član broj: 5621
Poruke: 280
*.ptt.yu.

+1 Profil

Re: prijava greske, nestala mi glavna forma!!!!!!

^{29.03.2005. u 08:20 - pre 232 meseci}

Ja mislim da je taj DFM snimljen binarno, a ne kao tekst?

Ako je snimljen kao tekst, trebalo bi da slika bude opisana ovako:

Code:

  object Image1: TImage
    Left = 200
    Top = 16
    Width = 105
    Height = 105
    Picture.Data = {
      07544269746D6170E61D0000424DE61D00000000000036000000280000003200
      0000320000000100180000000000B01D0000C40E0000C40E0000000000000000
      0000732926722825772B287C2F2C7429266A232080312E67211E7228257E302D
      81322F8333307C2F2C7E302D7A2D2A7C2F2C7A2D2A7429267F302D81312E772B
      28772B286F2623792C297C2F2C792C29772B28762A277C2F2C7B2E2B7A2D2A6F
      262366201D81322F6E2522742926762A2768211E752A27772B287228256E2522
      6F2623641E1B6D2421752A276A23207127247B2E2B7A2D2A00007E302D7E302D
      772B28772B286E25226E25227A2D2A6F26237429267B2E2B81322F7E302D7A2D
      2A7E302D7A2D2A7B2E2B772B287228257B2E2B81322F772B28772B286E252277
      2B762A27752A2780312E782C297329260000}
  end

Ako je tako, onda samo obrisi od Picture.Data= do zatvorene viticaste zagrade (ukljucujuci i taj red). Izgubices sliku, ali pretpostavljam da to nije problem.

Ako je u binarnom formatu, onda je malo teze. Probaj ovako:

nadji u dfm-u gde pise

TImageXImage1

(umesto X ce biti neki drugi znak, a umesto Image1 ce biti konkretno ime te slike koja zeza)

Iza TImageXImage1 ce biti jos neke vidljive stvari (width, height etc.), onda Picture.Data, onda TBitmap i onda sledi brdo "djubreta" tj necitljivog. Iza svega toga ce se pojaviti opis sledeceg objekta - prvo ide ime klase pa ime promenljive. Treba da obrises od "TImageXImage1" i SVE sto sledi do opisa sledeceg objekta.

Na primer:

TFORM1 0Ï. TPF0TForm1Form1Leftù Topâ WidthHeightCaptionForm1Color clBtnFace Font.CharsetDEFAULT_CHARSET
Font.Color clWindowTextFont.Heightõ Font.Name
MS Sans Serif
Font.Style Menu MainMenu1OldCreateOrder
PixelsPerInch`
TextHeight
TImageImage1LeftÈ TopWidthiHeighti Picture.Data
ò TBitmapæ BMæ 6 ( 2 2 ° Ä Ä s)&r(%w+(|/,t)&j# €1.g!r(%~0-2/ƒ30|/,~0-z-*|/,z-*t)&0-1.w+(w+(o&#y,)|/,y,)w+(v*'|/,{.+z-*o&#f 2/n%"t)&v*'h!u*'w+(r(%n%"o&#dm$!u*'j# q'${.+z-* ~0-~0-w+(w+(n%"n%"z-*o&#t)&{.+2/~0-z-*~0-z-*{.+w+(r(%{.+2/w+(w+(n%"w+({.+z-*q'$q'${.+y,)y,)n%"i"€1.q'${.+0-s)&|/,~0-y,)u*'{.+r(%r(%do&#g!p&#h!g!r(%p&#x,)i"€1.z-*j# {.+{.+w+(~0-€1.{.+v*'u*'€1.x,)s)& TAdvMemoeCodeLeft Top

Brises sve sto je crveno. U ovom slucaju izgubice se i sam TImage objekat, ali opet pretpostavljam da to nije problem.

Naravoucenije: slike ucitavaj u FormCreate a DFM snimaj tekstualno.

Odgovor na temu

DeYo
Dejan Vukmirovic
developer @ Mogul
Pozarevac/Bgd/Stockholm

Član broj: 36771
Poruke: 85
*.etf.bg.ac.yu.

Sajt: www.linkedin.com/in/dejan..

Profil

Re: prijava greske, nestala mi glavna forma!!!!!!

^{29.03.2005. u 15:22 - pre 232 meseci}

Citat:

Bojann: ali ja imam pas fajl i on je ok, ali ne radi forma odnosno verovatno dfm? a i problem je u tome sto ja nemam bak jer briem sve repove odnosno fajlove koji pocinju sa ~

Ja sam naveo pogresan fajl. I dfm fajlovi imaju svoje back-up fajlove. Treba da preimenujes mainform.~dfm u mainform.dfm. bak je back-up za Pascal. Ponavljam: ne garantujem da ce ovo proraditi jer je pitanje kada je taj back-up radjen. Mozda bi bilo najbolje da preimenujes i pas i dfm fajl.

Odgovor na temu