TStringGrid i kursor - problem

TStringGrid i kursor - problem 23.02.2010. u 17:50 · pre 203 meseca #1

Vezao sam za svaku stavku stabla po jedan StringGrid. Kada ucitam stablo, onda u petlji prodjem kroz sve stavke stabla i imam sledeci kod (deo)

Code:

    FormOpt.TreeMCU.Items[i].Data := TStringGrid.Create(nil);
    TStringGrid(FormOpt.TreeMCU.Items[i].Data).Parent := FormOpt.Panel7;

    LoadSG(TStringGrid(FormOpt.TreeMCU.Items[i].Data),s+'.mcf');
    SetRE(TStringGrid(FormOpt.TreeMCU.Items[i].Data),false);

U SetRE postavljam propertise za String grid.

Sve radi dobro (kopiranje, insertovanje reda, dodavanje reda, sortiranje prema nekoj koloni i brisanje reda), ali kada se pozicioniram na neku celiju da bi u nju nesto upisao ili editovao, to mogu da ucinim, ali mi se ne pojavljuje kursor i ne znam poziciju u tekstu. Sve sam probao sto mi je palo napamet, ali bez uspeha.

Molim za pomoc nekog ko je imao probleme slicne prirode ili zna za resenje mog problema.

Unapred hvala.

Re: TStringGrid i kursor - problem 23.02.2010. u 18:58 · pre 203 meseca #2

> Sve radi dobro (kopiranje, insertovanje reda, dodavanje reda, sortiranje prema nekoj koloni i brisanje reda), ali kada se pozicioniram na neku
> celiju da bi u nju nesto upisao ili editovao, to mogu da ucinim, ali mi se ne pojavljuje kursor i ne znam poziciju u tekstu. Sve sam probao sto
> mi je palo napamet, ali bez uspeha.

Izmenu teksta u StringGridu u osnovi obavlja standardna edit kontrola koja prikazuje kursor kada dobije fokus, verovatno imaš neku nestandardnu obradu poruka ili podešavanje u kodu koje to sprečava. Napravi kopiju forme u nekom test projektu i izbacuj deo po deo koda dok ne proradi.

Potpis

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

Re: TStringGrid i kursor - problem 26.02.2010. u 15:44 · pre 203 meseca #3

Par dana sam bio zauzet, u svakom slucaju hvala na odgovoru.

Problem mi je sto nemam ideju odakle da pocnem sa uklanjanjem koda. Da li da uklanjam komponente koje su na toj formi, i naravno kod koji je vezan za uklonjenu komponentu?

Stvarno bi mi bilo potrebno neko usmerenje.

Hvala i pozdrav.

Re: TStringGrid i kursor - problem 26.02.2010. u 17:05 · pre 203 meseca #4

> Problem mi je sto nemam ideju odakle da pocnem sa uklanjanjem koda. Da li da uklanjam komponente koje su na toj formi, i naravno
> kod koji je vezan za uklonjenu komponentu?

Pre svega radi na kopiji ne na originalu, kreni od komponenti koje nisu direktno vezane za grid, izbaci i njihov prateci kod kao i kod koji nije direktno vezan za grid. Takođe probaj i da grid praviš direktno na formi i da mu neposredni parent bude forma.

Potpis

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

Re: TStringGrid i kursor - problem 27.02.2010. u 12:52 · pre 203 meseca #5

Evo upravo sam isprobao tvoj slucaj (nije me mrzelo :) ); jer, neko bas neobicno ponasanje grida...

Dakle, stavio sam na formu panel, i jedan button. Zatim sam na na btn click postavio sledeci kod:

Code:

procedure TForm1.Button1Click(Sender: TObject);
var
  aSG: TStringGrid;
begin
  aSG := TStringGrid.Create(nil);
  aSG.Parent := Panel1;
  aSG.Options := aSG.Options + [goEditing];
end;

I, sve radi kako treba; znaci, editovanje grida sa sve kursorom.
Da nisu boje nekako poremecene, pa je kursor zapravo tu, ali je boja pogresna? Da li negde na formi radis neko custom crtanje?

Pozz

Rajko

Re: TStringGrid i kursor - problem 28.02.2010. u 13:07 · pre 203 meseca #6

Hvala svima na trudu.

Po ucitavanju StringGrida postavljam prpertis opcije pa i goEditing.

Mozda je problem u vezi sledeceg: klikom na stavku stabla, ucitavam StringGrid, mozda se tu nesto menja sa edit kontrolom?

Pozdrav.

Forum kao aplikacija na telefonu

Srodne teme