[ DART_VEJDER @ 12.05.2005. 10:21 ] @
moze li mi ko dati kod koji je potreban dijalozima "replace" i "find" da bi pravilno radili...?
ja sam pravio nekek kodove, ali mi oni rade tako da mi samo daju poziciju stringa koji trazimo u glavnom stringu, i slabo zamjenjuje nekim novim, pa tu sam onda pravio sam svoju formu za replace,jer ne znam kako bih bas uskladio kod sa vec gotovom formom...i bla bla...uglavnom DOSTA LOSE, a ovo mi je sve jako potrebno,em da zavrsim zadatak, em da dobro to prostudiram i konacno shvatim gdje sam grijesio i kako se ovi dijalozi pravilno programiraju...
tako da...ako neko zeli, moze i hoce...
bio bih jako zahvalan...
[ X Files @ 12.05.2005. 11:14 ] @
Mislim da postoje neki primeri u Help-u. Potrazi ih...

Code:

// netestirano!
AnsiString search = "pera";
AnsiString replace = "zika";

if ( replace.Pos(search) )
{
   return;
}


AnsiString Datoteka = "file.txt"; // <--- OVO TREBA DA UZMES IZ DIJALOGA

Memo1->Lines->LoadFromFile( Datoteka );

while ( true )
{
   int pos = Memo1->Lines->Text.Pos( search );
   if ( pos == 0 )
      break;
   Memo1->SelStart = pos - 1;
   Memo1->SelLength = search.Length();
   Memo1->SelText = replace;
}

Memo1->Lines->SaveToFile ( Datoteka );
[ IDE @ 12.05.2005. 16:04 ] @
nazalost, kod ne radiu u potpunosti...
sad sam ga na brzinu provjerio, i radi u 80 % slucajeva...
ali brine me onih 20% :-)!!
nisam jos utvrdio sta je u pitanju jer zurim na faks, ali npr sta ne radi:
ukucaj u memo samo slovo "m" i stavi da ti zamjeni sa "mikelandjelo" (npr.)
e, pa to nece raditi...
doduse ja sam napravio sa ovim kodom moju "replace" formu koja ima samo 2 edit-a ("search" i "find", dugme "replace!" i "close"
nisam htio borlandov replace dialog koristiti jer ima puno vise dugmadi koje bih morao programirati, sto bi sam mojim oskudnim znanjem borlanda potrajalo, a i treba mi samo naredba "replace" a ne i citav dialog i sve opcije koje tamo postoje...
ako nadjem u cemu je greska i popravim kod kasnije-javicu.
ako neko do tada nadje-bilo bi fino da takodje ovdje ispise njegovo rjesenje...

p.s.
x files, nisam bas najbolje shvati ono :

if ( replace.Pos(search) )
{
return;
}

mozes mi samo objasniti sta ti to znaci...
ostalo mi je OK
[ X Files @ 12.05.2005. 17:52 ] @
Najbojle pogledajte primer koji ide uz BCB:

C:\Program Files\Borland\CBuilder6\Examples\Apps\FindRep\...