[ knez @ 25.09.2005. 14:51 ] @
Kako da u MEMO polje preko stringa ubacim neki tekst vece duzine od 255?

Npr:
Code:

Table1.Edit;Table1.Insert;Table1POJAM.Value:='Ime i prezime';Table1.Post;
Table1.Edit;Table1.Insert;Table1POJAM.Value:='Ime i prezime';Table1.Post;
Table1.Edit;Table1.Insert;Table1POJAM.Value:='Ime i prezime';Table1.Post;
Table1.Edit;Table1.Insert;Table1POJAM.Value:='Ime i prezime';Table1.Post;
...


Kao ovo 'Ime i prezime' - samo tu bi bio tekst mnogo duzi?

Koju varijablu za taj string da koristim?

Ili ima neka druga caka?
[ Srki_82 @ 25.09.2005. 15:05 ] @
String tip nema ogranicanje u broju karaktera... dobro... ogranicenje je jedino memorija, a ShortString ima ogranicenje na 255 karaktera.

[Ovu poruku je menjao Srki_82 dana 25.09.2005. u 16:05 GMT+1]
[ knez @ 25.09.2005. 18:34 ] @
Izbacuje mi poruku:

String literals may have at most 255 elements

Znam da moze string + string + string, ali ne znam da li ima mogucnost da ubacim 3-4 pasusa teksta preko clipboarda u string, a da to bude vise od 255 karaktera.
[ Srki_82 @ 25.09.2005. 18:46 ] @
Pa... meni ne izbacuje takvu gresku... napravio sam ovakvo programce i radilo je bez problema
Code:
for I := 1 to 500 do
  S := S + IntToStr(I);
Table1.InsertRecord([S]);

Ubaci text od preko 1000 karaktera u Memo i sve bude ok.
[ knez @ 26.09.2005. 06:55 ] @
JA radim u Delphiju 7.

Cak i u editoru kad sa CTRL+V ubacim tekst u string, npr:

vrednost:='kjdaskfaklsdflaksdfklas....i tako preko 255 karaktera'

on izbaci poruku

One or more lines were too long and have been truncated

i presece tekst na 255, znaci ne odradi ceo paste.
[ Srki_82 @ 26.09.2005. 07:39 ] @
I ja radim u Delphi 7 i meni radi lepo... ne mozes da napises nesto kao
Code:
S := 'dsadsad...dadas';

gde izmedju apostrofa imas vise 255 slova i linija koda ne sme da ima vise od 1024 karaktera. Onaj moj primer radi 100% jer sam ga probao i Strig promenljive mogu da imaju karaktera koliko ima slobodne memorije, a ti nemoj da radis copy + paste celog texta i da ga dodeljujes kao S := 'text text text . . . text . . .' nego ili uradi ovako
Code:
S := 'text text text' +
  'text text text' +
  .
  .
  .
  'text text text';

ili ucitavaj text iz fajla u programu.
[ knez @ 26.09.2005. 13:18 ] @
Shvatio sam i ja to; nego mi je lakse preko clipboarda jer imam sve sredjeno, ali... sada sam to sve uradio preko:

Code:

S := 'text text text' +
  'text text text' +
  .
  .
  .
  'text text text';


Napravio sam makro iz Worda i dobio sam kao u ovom kodu iznad.

Hvala Srki!

Pozdrav!

P.S. Mislio sam da moze bez deljenja, a mnogo mi komplikovano iz textfile-a da ucitava.
[ Srki_82 @ 26.09.2005. 13:38 ] @
Zasto je komplikovano iz text fajla!?
Uradis ovako
Code:
DBMemo.Lines.LoadFromFile('text.txt');

i to je to!