Bilnex programında her türlü tasarımda (teklif, fatura, sipariş, stok etiket, cari etiket vs.) yazdırma esnasında dışardan veri girişi yaparak bu bilginin etikette veya tasarımda yazdırılmasını sağlayabilirsiniz. Bunun için Inputbox komutunu kullanacağız.
Rapor tasarımında sayfa üzerinde boş bir alanda tıkladıktan sonra sol taraftaki Nesne Yöneticisinde Olaylar sekmesinde “OnBeforePrint” satırında çift tıklayarak,
Veya “Rapor Ağacında Page1 i tıkladıktan sonra “OnBeforePrint” satırında çift tıklayarak aşağıdaki görselde görüleceği üzere Kod Sekmesine ulaşın.
Kod sekmesinde önce değişkenleri tanımlamak ve begin satırından sonra da bu değişkenlerin tanımlama ve kullandırılması ile ilgili satırları yazmak gerekir.
Bu örneğimizde “sehir” isminde değişken tanımladık. Daha sonra Begin ve end; arasında Inputbox komutu ile veriyi alıp yazdırılmasını sağladık.
Yazdırma komutu ile birlikte istenen verinin girilmesi gerekir.
yazılan veri tasarımda ilgili alana yazdırılır .
Bu şekilde istediğiniz kadar değişken tanımlayarak yazdırmanız mümkün. Yazdırılacak her bir alan için yeni bir değişken tanımlamak gerekir.
İlgili kodu aşağıdan kopyalayabilirsiniz…
procedure Page1OnBeforePrint(Sender: TfrxComponent);
var
sehir: String;
begin
sehir:=inputbox(‘Bilnex Bilgi’,’Oturduğunuz şehri girin?’,”);
Memo1.text:=sehir
end;
begin
end.