Beginner
Members-
Posts
90 -
Joined
-
Last visited
-
Days Won
1
Content Type
Profiles
Forums
Events
Everything posted by Beginner
-
I resolved like this Work FF and other browser procedure TfrmLogin.UniLoginFormCreate(Sender: TObject); begin UniSession.AddJS('document.body.style.background = ''url("/files/bg.jpg") no-repeat center center fixed'''); UniSession.AddJS('document.body.style.backgroundSize = "cover";'); end;
-
Hi All How add this css class or where add for login form ? Anybody help me pls
-
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;
-
Very interesting issue +1
-
Other theme support your component? Windows 10 or Mac theme?
-
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
-
Kill application, recompile and auto start in browser
Beginner replied to NelsonFS's topic in Components and Code Samples
I found what problem before run I need change something like move button or change caption like this after that compilled and run task will kill.. In RAD XE3 work everytime when pushing RUN without changing something but RAD Tokiyo need change something before run second time- 13 replies
-
- kiill
- application
-
(and 3 more)
Tagged with:
-
Thank you for your effort And where i can read about flex layot theme? In unigui too many option about layot config for me I don't know when use hhox or vbox or form,border , region etc
-
@mohammad http://dropmefiles.com/D5aHQ
-
Kill application, recompile and auto start in browser
Beginner replied to NelsonFS's topic in Components and Code Samples
Trial Edition But another exe not unigui app i can't kill before compile Sorry on Delphi Xe 3 Windows 7 work fine But Delphi Rad Tokiyo 10.2.2 OS Windows 10 can't kill task by RAD 10.2.2 pre build command if this command run cmd .exe "taskkill /F /IM test.exe /T" Tasks killed all- 13 replies
-
- kiill
- application
-
(and 3 more)
Tagged with:
-
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
-
Kill application, recompile and auto start in browser
Beginner replied to NelsonFS's topic in Components and Code Samples
Don't work taskkill What I'm doing wrong? Rad 10.2.2- 13 replies
-
- kiill
- application
-
(and 3 more)
Tagged with:
-
UniGUI Course in English, Is there a demand?
Beginner replied to Georges Soares's topic in Third Party Components
+1 Waiting course -
Hi all I have question how hide this row when mouse cursor point I mean when cursor move to row grid row hight auto show this description and when mouse move other side then hide row hight half size sorry my english
-
Me Myself & Cart: a new mobile app with full source code
Beginner replied to mhmda's topic in Sample Projects
Thanks Mohammad for your source Good Job