! CODEBANK 2012 !
İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.
ÖNEMLİ AÇIKLAMA: MUTLAKA OKUYUNUZ!
0 Üye ve 1 Ziyaretçi konuyu incelemekte.
BeginEnd.
Memo1.Color := clRed; //memo rengini kırmızı yapar.
<DegşiskenAdi> Get(‘DegşiskenAdi’) // Değişken değerini alırSet(' DegşiskenAdi’, 10); // değişkene 10 değerini atıyoruz. if Get(‘DegşiskenAdi ') = 10 then ... // değişkenin değeri 10’saAlanların kullanımı<frxDBDatasetAdi."AlanAdi">
borç Alacak Bakiye100 0 10050 0 1500 25 125
Set('Bakiye',<frxDBDataset1."ALACAK">-<frxDBDataset 1."BORC">+<Bakiye>);
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);VarSay:Double;beginSay:=<frxDBDataset1."ALACAK">-<frxDBDataset1."BORC" >+Say;MemoBakiye.Text:=FloatToStr(Say);end;
if Copy(<frxDBDataset1."Adi">, 1, 1) = 'A' thenMasterData1.Visible := True elseMasterData1.Visible := False;