Delphi Forum

oncalcfields içine kodun başına
if dataset.state in [dsbrowse] then exit;
denermisin

sorun çözüldü demek yerine sorunun nasıl çözüldüğünü söylersen başkaları için de yararlı olabilir.

o da tüyü işte

View'ın FocusedItemChanged ve memEvrakViewFocusedRecordChanged diye iki olayı var item olan column değiştiğinde record olan row değiştiğinde olur ama ada alt ya da üst çapraz column a geçtiğinde ikisi birden olur.

öncelikle sayfasını ziyaret et ve iletişim protokolünü oradan edinmeye çalış eğer bulamaz isen yurtiçindeki satış kanallarından iste.o da olmaz ise wireshark denilen network'ü izleyebildiğin giden gelen verileri görebildiğin ücretsiz bir program var onu indir ve makinana kur.cihazla iletişimi kur ve ...

mrb,
oncelikle bu sorunu bizim bulmamız çok zor zira konu senin datanla ilgili teknik bir konu değil.ama kısaca ilk gözüme çarpan olay şu satıs_detay tablonda ürün_kimlik 'ten daha önce
[MAGAZA] [varchar](500) NOT NULL,
[EKLEYEN_PERSONEL] [varchar](500) NULL,
[KATEGORI_KIMLIK] [varchar](500 ...

o item kısmına integer mı gelir bilmiyorum ama sanırım o iş çok zor değil

//tanımlamalar
str : string;
myval : TValue;
//

for Field in Cxt.GetType(Tper.ClassType).GetFields do
begin
str := (TJSONPair(field.name).JsonValue.Value);//item kısmına ben field.name yazdım.amaç o isimdeki pairin ...

hido cevap verilmiş teşekkür ediyorsun sonra çözümde birebir belirttiği bir şeyi sanki hiç okumamış gibi tekrar soruyorsun...

anahtar kelime : J4L Barcode Vision for Delphi

genelde şirketlerde her bilgisayarda internet bulunmayabilir.bence en iyi yöntem.
1-Kurumdaki server'da çalıştırmak üzere bir servis yazmalısın ve bu servis senin lisans server programın ile haberleşecek.bağlantı TCP/IP olabilir.
2-Servis clientler ile udp haberleşebilir.Sisteme bağlanan client ...

şu prepare komutlarına gerek yok ilkönce onu kaldır.
ikinci olarak parametrenin tipini ver
olması lazım...
profiler eğer sql server'ın express versiyon değilse default olarak yüklü gelir yok ise google : expressprofiler
bu izleme aracı benim çok işime geliyor sql server 'a giden sqlleri ...

profiler ile izledin mi hiç ?

1.seçenek diğer formların uses 'ına form1'in unitini eklersin ve diğer formlarda formun onkeydown'nına ctrl+s kombinasyonuna
form1.ListView1KeyPress(form1) yazarsın ya da
1-form1'de CONST WM_KAYDETMSG = WM_USER+1 OLARAK TANIMINI YAPIYORSUN
2-procedure OnMyMessage(var Msg: TMessage); message WM ...

eğer her formda bu kodları yeniden yazmak istemiyorsan bu formu ata form olarak kaydedip , yarattığın diğer formları bu formdan inherit etmen lazım ancak amacın hangi ekranda olursa olsun form1'in altındaki kodlar çalışcak diyosan postmessage ya da sendmessage ile çözebilirsin.
amacını detaylı ...

fikir verir...
for i:=0 to Form1.componentcount - 1 do begin
if component = TAButton then
case TAButton(components).tag) of
0:TAButton(components).caption := '0 nolu taga sahip buton'
..
..

end;

end;