pro_imaj

Login formu işin dışında tutarak sorunu çözdüm. İyi çalışmalar.

Merhaba; Programda Girişte kullanıcı adı ve şifre ile giriş yapıp ana ekrana geçiyorum. Giriş yaptığım ekranda KullanıcıAdı ve Şifresini parametre olarak gönderen bir procedure var. Ana ekrandayken farklı kullanıcı adı ve şifreyi parametre olarak gönderip programa ilgili kullanıcıyla giriş yapmak istiyorum nasıl bir yol izlerim. Örnek; Giris(edtKAd.Text, edtKSifre.Text); Yukarıdaki parametreye göre ilgili tablolar kontrol ediliyor ve sonuç başarılıysa ModalResult := mrOK; şeklinde login form kapanıyor ana ekran geliyor. Ana ekrandayken yukarıdaki gibi Kullanıcı adı ve şifreyi parametre olarak gönderdiğimde Login ekrana karşıma geliyor. Halbuki ben login ekranı bilgilerini zaten parametre ile gönderip başka bir kullanıcı ile sisteme giriş yapmak istiyorum. Bunu nasıl çözebilirim. Teşekkürler.

UniPDFFrame nesnesinde bu işlemi nasıl yapabiliriz. Geçmiş PDf dosyasını görüyor.

Thanks @Delphi Developer

Merhaba; Aşağıdaki gibi bir nesne oluşturmaya çalıştığımda CoInitialize çağrılmamış, ProgID: "Excel.Application". hatası alıyorum unigui tarafında bu nesneyi nasıl oluşturabilirim. var ExcelAPP: variant; begin ExcelAPP:=CreateOleObject('Excel.Application'); Teşekkürler.

No, for all Species No field Thanks.

Merhaba; Vertical Grid içerisindeki colums'u (resimde sarı işaretli olan) içindeki metni nasıl ortalaya bilirim? Teşekkürler.

Sorunu aşağıdaki şekilde çözdüm; //Query ilgili satıra konumlansın UniMainModule.QList.Filter := 'Tanim = ''' + UniMainModule.QKullanici.FieldByName('Tanim').AsString + ''' '; UniMainModule.QList.FindFirst; //dblookupcombobox ilgili alan seçilsin. look.KeyValue := UniMainModule.QTest.FieldByName ('Tanim').AsString; //Seçim işlemi yürüt lookSelect(Sender);

Merhaba; UnidbLookCombobox => ListField alanındaki text değeri otomatik nasıl getirebilirim. Örneğin; UnidbLookCombobox => ListField listesindeki herhangi bir değer tabloda var, var olan ilgili kayıtı otomatik nasıl seçtire bilirim? UnidbLookCombobox Listesindeki Veriler A Veri B Veri C Veri Ben tabloda B Veri değerini tutuyorum ve bunu otomatik seçtirmek istiyorum (Kod ile) Teşekkürler.

Sorunun kaynağını tam olarak tespit edince çözüldü. FDMemTable kullanıyordum, içindeki verileri temizlemek için aşağıdaki gibi kullanıyordum; MemTable.Close; MemTable.Open; Bunun yerine aşağıdaki gibi kullanınca sorun çözüldü; MemTable.IsEmpty; UniMainModule.MemTable.EmptyDataSet;

O zaman soruyu şöyle değiştireyim. Grid'de ki bir Column'a veri yazma işlemi gerçekleştiğini nasıl alırım; Yapmak istediğim şu; Dblookupcombobox ta herhangi bir değer seçildiğinde bu seçilen değere istinaden veri tabanında sorgulama yapıp dönen değeri grid üzerindeki başka bir alanda göstermek!

Böylede kullanınca ikinci mesaj doğru geliyorken ilkinde gelmiyor. ShowMessage ('KeyValue = ' + (Sender as TUniDBLookupComboBox).KeyValueStr); ShowMessage ('KeyValue = ' + (Sender as TUniDBLookupComboBox).KeyValueStr);

Aşağıdaki gibi kullanırsam ikinci mesajda doğru geliyor. Fakat ikinci mesajı tek kullanırsam gelmiyor. ShowMessage ('KeyValue = ' + (Sender as TUniDBLookupComboBox).KeyValueStr); ShowMessage(dblookupcombobox.Text);

Hata hala aynı devam ediyor ve aşağıdaki hatayı veriyor nasıl çözebilirim? _rsov_(O189,26);O20D.setReadOnly(true);O211.removeAll(false);O20D.setReadOnly(false);O211.removeAll(false);O211.insert(0,{id:"109",val:"A"});O211.insert(1,{id:"110",val:"K"});O211.insert(2,{id:"111",val:"B"});O211.insert(3,{id:"112",val:"E"});O211.insert(4,{id:"113",val:"C"});O1DC.load({params:{options:1}});_sfv_(O20D,0,"");

LookupCombo yüzünden oluşuyor bu hata, yukarıdaki işlemin sonunu LookupCombonun listesini dolduruyor.

LookupCombo nun datasource ve dataset bağlantılarını kaldırınca sorun düzeliyor. Kod ile temp bir datasource oluşturuyorum önce onu ekleyip işlem bitimine tekrar eski haline alıyorum fakat bu şekilde hata yine oluşuyor. var DStemp: TDataSource; begin cmbLook.DataSource := DStemp; cmbLook.ListSource := DStemp; UniMainModule.Query1.First; while not UniMainModule.Query1.Eof do begin UniMainModule.MemTable.Append; UniMainModule.MemTable.Edit; UniMainModule.MemTableAdi.Text := UniMainModule.Query1Adi.Text; UniMainModule.MemTableimage.Assign(UniMainModule.Query1image); UniMainModule.MemTable.Post; UniMainModule.Query1.Next; end; UniMainModule.MemTable.First; end; cmbLook.DataSource := UniMainModule.DS1; cmbLook.ListSource := UniMainModule.DS02;

Grid içinde

Merhaba; dblookupcombobox=>OnSelect olayına aşağıdaki kodu yazdığımda seçtiğim kaydı değil bir önceki seçtiğim kaydı getiriyor bunu nasıl düzeltebilirim? *dblookupcombobox'u hidden panel içinde kullanıyorum grid üzerinden seçim yapıyor kullanıcı. ShowMessage('KeyValue = ' + (sender as TUniDBLookupComboBox).KeyValueStr);

Mantık olarak bu loop uzun sürebildiğinden işlem bitmeden kullanıcı tekrar tekrar bu olayı tetikletebiliyor sorunda burada oluşuyor.

UniMainModule.Query1.First; while not UniMainModule.Query1.Eof do begin UniMainModule.MemTable.Append; UniMainModule.MemTable.Edit; UniMainModule.MemTableAdi.Text := UniMainModule.Query1Adi.Text; UniMainModule.MemTableimage.Assign(UniMainModule.Query1image); UniMainModule.MemTable.Post; UniMainModule.Query1.Next; end; UniMainModule.MemTable.First; end;

UniDBVerticalGrid => OncellClick has code in click event This error occurs if the user clicks multiple times. (The user clicks again before the process is completed.) How do I resolve more clicks without using UniscreenMask?

Improved when closing and opening the query. Thanks regards.

Unigui versiyon: 1.10.0.1451 Delphi versiyon: 10.2 I have a unidbgrid in the program I have a unidblookupcombobox in UniHiddenPanel I get this error when I turn off the screen after running it the first time and it works fine.

Error Code _rsov_(OF07,1);OF8B.setReadOnly(false);OF35.setActiveTab("_1");OF7D.hide();delete OF56_Cols;OF56.refreshColumnCache=true; O1109=new Ext.grid.column.Column({ogrid:OF56,sortable:false,dataIndex:"0",renderer:_rndcll_,rdonly:true,text:"Kodu",width:120,attr:"{fts:'font-weight:bold;font-size:12px'}",unEditable:true});O1109.nm="O1109"; O1111=new Ext.grid.column.Column({ogrid:OF56,sortable:false,dataIndex:"1",renderer:_rndcll_,rdonly:false,text:"Olcu",width:152,attr:"{fts:'font-weight:bold;font-size:12px'}",editor:{xtype:"textfield",fieldStyle:"font-weight:bold;font-size:12px;color:#000000"}});O1111.nm="O1111";O1111.editor.uform=OF56.uform;O1111.editor.focusDisabled=true;O1111.editor.isCellEditor=true; O1119=new Ext.grid.column.Column({ogrid:OF56,sortable:false,dataIndex:"2",renderer:_rndcll_,rdonly:true,text:"Miktar",align:"right",ct:"number",width:177,attr:"{fts:'font-weight:bold;font-size:12px'}",unEditable:true});O1119.nm="O1119"; O1121=new Ext.grid.column.Column({ogrid:OF56,sortable:false,dataIndex:"3",renderer:_rndcll_,rdonly:false,text:"S. Miktar",align:"right",ct:"number",width:177,attr:"{fts:'font-weight:bold;font-size:12px'}",editor:{xtype:"numberfield",fieldStyle:"font-weight:bold;font-size:12px;color:#000000"}});O1121.nm="O1121";O1121.editor.uform=OF56.uform;O1121.editor.focusDisabled=true;O1121.editor.isCellEditor=true;var OF56_Cols=[O1109,O1111,O1119,O1121];OF56.reconfigure(null,OF56_Cols);OF56.uniConfigColumns();O1109.setElProp({"text-align":"center"},null,0,null,null,"titleEl");O1111.setElProp({"text-align":"center"},null,0,null,null,"titleEl");O1119.setElProp({"text-align":"center"},null,0,null,null,"titleEl");O1121.setElProp({"text-align":"center"},null,0,null,null,"titleEl");OF5A.load({params:{options:1}});OF8B.stateValue="50D91F060000000000000000";OF8F.removeAll(false);OF8F.insert(0,{id:"8",val:"80 X 150"});OF8F.insert(1,{id:"9",val:"80 X 300"});OF8F.insert(2,{id:"10",val:"100 X 300"});OF8F.insert(3,{id:"11",val:"100 X 200"});OF8F.insert(4,{id:"12",val:"120 X 180"});OF8F.insert(5,{id:"13",val:"160 X 230"});OF8F.insert(6,{id:"14",val:"200 X 300"});OF8F.insert(7,{id:"15",val:"200 X 290"});OF79.setElProp("innerHTML","\x3Cimg src='/cache/test01_exe/res/__B25EEE4CDE345A1B908F7CFB.jpg' width='138' height='313' hspace='0' vspace='0'\x3E",2);_sfv_(OF8B,0,""); Unigui versiyon : 1.10.0.1451 Delphi versiyon :10.2

Merhaba; UniDbGrid / column properties / editor kısmında hidden panel içindeki Unidblookcombobox seçiyorum, Unidblookcombobox listesi sorunsuz olarak açılıyor fakat bazen liste hiç gelmiyor bunun nedeni nedir? Unidblookcombobox hidden panel içinde kullanmak sorunlu bir çözüm mü? Teşekkürler.