[Show ScreenMask,When Run Query]

Hi

 

 

Unit1 is unit and don't have form.

 

 

Best Regards.

[filter grid]

Hi

 

 

Have you'r Select answer in Sql Server ?

 

 

Best Regards.

[Caption of UniLabel don't change.]

Hi

 

I write below code,But

const
  magicnumber = 500;

procedure TMainForm.Button2Click(Sender: TObject);
var
  I, J: Integer;
  X, Y: Word;
begin
  I := 0;
  J := 0;

  UniLabel1.Caption:='The Button2Click handler has started';

  while I < magicnumber do
  begin
    Randomize;
    while J < magicnumber do
    begin
      Y := Random(J);
      Inc(J);
      Sleep(10);
    end;
    X := Random(I);
    Inc(I);
  end;
  UniLabel1.Caption:='The Button2Click handler is finished';

end;

This line code ,

  UniLabel1.Caption:='The Button2Click handler has started';

Don't Work.I have unipanel and put unilabel1 on it.and set unipanel   AlignmentControl to uniAlignmentClient.

 

Best Regards.

[unitreedbgrid]

Hi

 

You'r parenid filed in table or query must be nil.

ID	MyId	idparent
1	40	99
2	42	99
3	32	90
4	30	90
5	58	91
6	50	91
7	99	0
8	91	99
9	90	0

 

Best Regards.

[unitreedbgrid]

Hi

 

Are you Set IdField and IdParentField properties or TreeKeyFields that set in first grid demo ?

 

 

Best Regards.

[Show ScreenMask,When Run Query]

Hi

 

I Used it,but I have error.

 

I change Form to main form name,and use my main form in uses list ,but error appear.

  Main.ShowMask('Loading');
  UniSession.Synchronize();
  UniMainModule.ADOQuery1.Open;
  Main.HideMask;

Best Regards.

[Show ScreenMask,When Run Query]

Hi,

 

 

Which Library must be in uses List?

 

 

Best Regards.

[Show ScreenMask,When Run Query]

Hi

 

 

I have a unit,and on it I run query,

 

In VCL ,I write below code

      screen.Cursor := crSQLWait;
      ATable.Open;
      screen.Cursor := crdefault;

What i can write ,for it in my unit?

 

 

Best Regards.

[Unidbgrid Columns CustomConstraint]

Hi

 

In UniDbGrid ,columns don't get CustomConstraint.

I Create UniDbGrid in Runtime and set fields,But UniDbGrid columns don't have CustomConstraint that Field in dataset has.

I write below code

      For i := Columns.Count - 1 DownTo 0 do
         Columns[i].Field.CustomConstraint:=ASource.DataSet.Fields[i].CustomConstraint;

But Show below Error

 

First chance exception at $0040BF8A. Exception class $C0000005 with message 'access violation at 0x0040bf8a: write of address 0x00000094'. Process P.exe (5616)

 

Best Regards.

[ModalResult Of LoginForm]

Hi

 

I write TestCase ,But in TestCase the procedure work correct.

 

http://uupload.ir/view/4wlf_loginchkusername.rar

 

But in my main project,don't work

 

Best Regards.

[ModalResult Of LoginForm]

Hi

 

I write below code ,and check edits on login Form  isn't empty.

procedure Tfgetsqlpass.UniButton1Click(Sender: TObject);
begin
  if (edt_uname.Text ='' ) and  (edt_pword.Text = '') then
   Begin
    ModalResult := mrNone;
    ShowMessage('Please fill username and password!');
    Exit
   End;
end;

But after Button1Click application terminate.

 

 

Best Regards.

 

[New Unit and ShowMessage]

Hi

 

I want use new unit ,when i want use Showmessage ,what library must be use?

 

 

Best Regards.

 

[UniPopupMenu in niDBGrid in Runtime]

Hi

 

 I compiled on 1346,and my friend compiled by 1363. 

 

 

 

Best Regards.

[UniPopupMenu in niDBGrid in Runtime]

Hi

 

I use below Code,for create UniPopupMenu in UniDbGrid in Runtime,But don't work.what's my error?

procedure TMainForm.UniDBGrid1CellContextClick(Column: TUniDBGridColumn; X,Y: Integer);
Var
  MyUniPopupMenu:TUniPopupMenu;
  i: SmallInt;
  MI: TuniMenuItem;
  AGrid:TUniDBGrid;
  Aagrid:TComponent;
begin
  Aagrid:=Column.Grid;
  AGrid:=FindComponent(Aagrid.Name) as tunidbgrid;
  MyUniPopupMenu:=TUniPopupMenu.Create(AGrid);
  MyUniPopupMenu.Popup(X,Y);
  For i := 0 To 3 do
  Begin
    MI := TuniMenuItem.Create(AGrid);
    MI.Name := AGrid.Name + 'MI' + IntToStr(i);
    MI.Caption:='s'+IntToStr(i);
    MyUniPopupMenu.Items.Add(MI);
  End;
end;

Best Regards.

[Simulate OnEnter For Grid]

Hi

 

I want know,is my solution for OnEnter  true ?

 

 

Best Regards.

[Simulate OnEnter For Grid]

Hi
 
 
I simulate OnEnter for uniDbGrid in attached Project,Is it True?

 

http://uploadboy.me/1fjp5501heak/Grid_Active.rar.html
 
 
Best Regards.

[TuniDBGrid(Sender).SelectedField]

Hi

 

I write it in UniDBGrid1DblClick event ,and sender is current UniDBGrid.

 

Best Regards.

[TuniDBGrid(Sender).SelectedField]

Hi

 

 

I want  this command in unigui.

Var
  SF: TField;
Begin
   SF := TuniDBGrid(Sender).SelectedField;   
End;

How to can do it?

 

 

Best Regards.

[How to can active UniDbGrid?]

Hi

 

How to I can know ,Before Insert Click,active Control on Customers Grid Or On Orders Grid.

Notice that ,I create all control in runtime.

 

 

Best Regards.

[How to can active UniDbGrid?]

Hi

 

I have a UniForm and UniButton  on it for Insert,Edit or Delete data on UniDbGrid.

I create three UniDbGrid A,B and C in runtime,that A is Master of B and C.

 

Now my question is :

How to can find, when UniButton clicked,cursor was on whom UniDbGrid A or B or C.

 

 

In VCL, I find it by ActiveControl.

 

 

 

Best Regards.

[How to can Table1.Active:=True; OnEnter event on UniDbGrid?]

Hi

 

I want Set Table1.Active := True in OnEnter event on Unidbgrid..

How to i can? or with what event i can replace it?

I can't use OnMouseEnter ,Because my data is Big.

 

Best Regards.

[Selected Records]

Hi

 

I write a testcase,In it I have a grid and filter the record,Then I select record  by filtering.

But after clear filter,the selected record unchecked.

How to i must solve it?

 

 

Best Regards.

[How to can call frame with two condition]

Hi

 

How to can call frame with two condition?

I have a frame that locate on grid,and i have when call frame with first condition

 

adoquery1.active:=true

 

and when two condition done,

 

adoquery2.active:=true

 

 

What i do?

 

 

Best Regards.