Rave Report Delphi

[ hostpera @ 20.06.2010. 14:09 ] @

Molim Vas da mi pomognete. Imam jedan problem. Za mene je to veliki problem, ali za nekog ko se razume u te stvari i nije.

Pravim neku aplikaciju u Delphi–ju 2010 (Rad studio 2010). Postavio sam na formu jedno dugme i sada želim da kada kliknem na to dugme promenim poziciju komponente(ime komponente: DataText1) koja se nalazi na Rave Report-u.

Znači, kliknem da dugme koje je na formi i promeni se u Rave Report-u npr. leva pozicija (DataText1.Left) komponente.

procedure TForm1.Button1Click(Sender: TObject);
begin
RvProject1.Open;

//šta bi trebao da upišem ovde da bi prethodni problem rešio

RvProject1.Execute;
end;

Unapred zahvalan!

[ savkic @ 20.06.2010. 15:53 ] @

> Znači, kliknem da dugme koje je na formi i promeni se u Rave Report-u npr. leva pozicija (DataText1.Left) komponente.

Zar nije dovoljno upravo to (s tim što trebaš videti da li to treba pre ili posle Open metode rave projekta).
DataText1.Left := 50;

[ hostpera @ 21.06.2010. 20:42 ] @

Nije tako prosto, probao sam to, ali nije tako.
Znam kako da promenim tekst toj komponenti sa SetParam...Za Page1 parameters napisao sam da mi je ta komponenta sLabel1, pa preko DataField opcije povezao sve to.

Valjda ću uskoro naći neko rešenje za ovaj problem.

U svakom slučaju HVALA. Pozdrav.

[ Rapaic Rajko @ 22.06.2010. 09:40 ] @

Pogledaj ovu temu, prastara je, ali je nekako iskocila na vrh table: http://www.elitesecurity.org/t58757-Rave-parametri

Imas upravo ono sto ti treba. I da, ako se ne varam jedinica mere je inch, a ne pixel ni cm... probaj.

Rajko

[ hostpera @ 25.06.2010. 12:35 ] @

Već sam bio pogledao. Nije to ono što meni treba.

Hvala,Pozdrav

[ _deran_ @ 26.06.2010. 00:05 ] @

Code:

.....
       uses ... , RVClass, RVProj, RVCsStd;
.....

procedure TForm1.Button1Click(Sender: TObject);
var stranica:travepage;
    objekat: travetext;
begin
rvproject1.Open;
  with rvproject1.ProjMan do
  begin
    stranica:=FindRaveComponent('Report1.Page1',nil) as TRavePage;
    objekat:=FindRaveComponent('DataText1',stranica) as TRaveText;

    objekat.Left:=0;

  end;
rvproject1.ExecuteReport('Report1');
rvproject1.Close;
end;

[ hostpera @ 26.06.2010. 20:45 ] @

Derane svaka čast. To je ono što mi je trebalo. Sve radi kako treba.

HVALA, HVALA...........HVALA...........HVALA!

HVALA!

[ Rapaic Rajko @ 28.06.2010. 22:27 ] @

???

Rajko

[ _deran_ @ 29.06.2010. 00:12 ] @

:)
ja sam nasao to ovde pa sam kasnije tek pogledao Rajkov link. isto to :)

[ hostpera @ 03.07.2010. 14:26 ] @

Rajko izvini, greska.

HVALA, tvoj odgovor mi je puno pomogao - HVALA