Jump to content

Beginner

Members
 View Profile  See their activity

  • Posts

    90

  • Joined

  • Last visited

  • Days Won

    1

 Content Type 

Posts posted by Beginner

    How set background image uniloginform?

    in General

    Posted

    Hi All

    How add this css class or where add for login form ?

    Anybody help me pls

     

    OK! I resolved it with set in Costum CSS:

    background: #fafafa url(files/image.png) center top repeat;

     

    its Work for me under iis!

     

    there is some other sample for use:

     

    body .site {
    background-color: #fafafa;
    }

     

    Alternately, you could add a background pattern to it should you desire:

    body .site {
    background: #fafafa url(http://yourdomain.com/path/to/your/image.png) center top repeat;
    }

     

    And finally, you could implement a fullscreen image if needed:

    body .site {
    background: #fafafa url(http://yourdomain.com/path/to/your/image.jpg) center center no-repeat;
    -webkit-background-size: cover;
    background-size: cover;
    }

     

     

    Regards

    How to set cookie dbgrid columns visible when user check to visible or hide some column?

    in General

    Posted

    Trial

    I found solution who interesting please chek this source If you have any best solution share here

    Procedure StringExplode(s: string; Delimiter: string; Var res: TStringList);
Begin
	res.Clear;
	res.Text := StringReplace(s, Delimiter, #13#10, [rfIgnoreCase, rfReplaceAll]);
End;

procedure loadGridLayout(Mydbgrid: TUnidBGrid; fileName: string);
var
	lines: TStringList;
	columnInfo: TStringList;
	lineCtr: integer;
	colIdx: integer;
cnt: integer;
begin
  try
    lines := TStringList.Create;
    columnInfo := TStringList.Create;
    lines.Delimiter := '^';
    lines.StrictDelimiter := True;
    lines.DelimitedText:=fileName;
    for lineCtr := 0 to lines.Count-1 do
    begin
      if trim(lines[lineCtr]) <> '' then
      begin
        StringExplode(lines[lineCtr], '~ ', columnInfo);
        cnt:=Mydbgrid.Columns.count;
        for colIdx := 0 to cnt-1 do
        begin
          if Mydbgrid.Columns[colIdx].FieldName = columnInfo[1] then
           begin
              Mydbgrid.Columns[colIdx].Visible := StrToBool(columnInfo[2]);
              Mydbgrid.Columns[colIdx].Index := lineCtr;
          end;
        end;
      end;
    end;
  finally
    lines.free;
    if assigned(columnInfo) then
    columnInfo.free;
  end;
end;




procedure TMainForm.saveGridLayout(Mydbgrid: TUnidBGrid);
var
lines:  TStringBuilder;
i: integer;
begin
   try
    lines := TStringBuilder.Create;
    with Mydbgrid do
    begin
      for i := 0 to Mydbgrid.Columns.count-1 do
      begin
        lines.Append(IntToStr(Mydbgrid.Columns[i].Index));
        lines.Append('~ ');
        lines.Append(Mydbgrid.Columns[i].FieldName);
        lines.Append('~ ');
        lines.Append(BoolToStr(Mydbgrid.Columns[i].Visible));
        lines.Append('^');

         UniApplication.Cookies.SetCookie(Mydbgrid.Name,lines.ToString, Now+(10.0/1440.0));

	end;
	end;


	finally
	lines.free;
	end;
end;


procedure TMainForm.UniFormClose(Sender: TObject; var Action: TCloseAction);
begin
  saveGridLayout(UniDBGrid1);
end;


procedure TMainForm.UniFormCreate(Sender: TObject);
begin
   loadGridLayout(UniDBGrid1,UniApplication.Cookies.Values[UniDBGrid1.Name]);
end;

    Bootstrap buttons

    in General

    Posted

    Hi,

     

    Perhaps in part, but you can try to use this way I think:

     

    1. CustomFiles:

    files/bootstrap.min.css

    2. beforeInit:

    function beforeInit(sender, config)
{
    config.baseCls="btn";
    config.cls="btn-default";
}

function beforeInit(sender, config)
{
    config.baseCls="btn";
    config.cls="btn-primary";
}

function beforeInit(sender, config)
{
    config.baseCls="btn";
    config.cls="btn-success";
}

function beforeInit(sender, config)
{
    config.baseCls="btn";
    config.cls="btn-info";
}

function beforeInit(sender, config)
{
    config.baseCls="btn";
    config.cls="btn-warning";
}

function beforeInit(sender, config)
{
    config.baseCls="btn";
    config.cls="btn-danger";
}

    Result:

     

    attachicon.gifbootstrapButtons.png

     

    Best regards,

     

     

    Hi thank you for you

     

    I have question after I added before init 

        config.baseCls="btn";

        config.cls="btn-danger";

    Other button  not poperly rendered

     

    How solve this problem? Unigui last trial

    Basic layouts

    in Sample Projects

    Posted

    Hi everybody,

    mohammad

    Can you help me how design right?

     

    I have MainForm, Frame_child

     

    Mainform layot = hbox

     

    in main form have 3 panel

     

    1 panel layot = vbox and width =100%  (for the top)

    2 panel layot = absolute and height = 100% (left sidebar)

    3 panel layot = absolute and hight =100% and flex =1 (center)

     

     

    Frame layot = hbox

    in frame 2 panel

    1 panel layot = vbox and width =100%

    2 panel layot = absolute and heigh = 100%

     

    But in MainForm not properly show  Frame_child in  panel 3

×
×
  • Create New...