-
Posts
356 -
Joined
-
Last visited
-
Days Won
18
Content Type
Profiles
Forums
Events
Posts posted by Oliver Morsch
-
-
I need to get the path of the source file (the file path of the end user's machine) ...
You use an uniFileUpload and want to get the path of the file on client machine?
Then see #2.
-
Link should work without to do something.
-
Is your upload folder a subfolder of UniGUI root folder? Then you have nothing to do in HTTPCommand...
-
You get no path info on a file upload in browser.
-
You must use Non-Blocking MessageDlg (with callback).
-
-
Is it the last created control? (Try with a new panel.)
Otherwise you must set the z-index using javascript.
-
UniSession.SessionID
-
Is the panel in front at design time?
-
-
1. Interface:
unit UKeyDown; interface uses System.Classes; type IKeyDown = Interface ['{C21C434B-E6F7-4E2C-98CB-3ACC526566BE}'] procedure FnKeyDown(Sender: TObject; Key: Word; Shift: TShiftState); End; implementation end.
2. In each Frame:
Uses ... UKeyDown; type TfraTest = class(TUniFrame, IKeyDown) ... public procedure FnKeyDown(Sender: TObject; Key: Word; Shift: TShiftState); end; procedure TfraTest.FnKeyDown(Sender: TObject; Key: Word; Shift: TShiftState); begin case Key of VK_F1: begin ShowMessage(scKeys.Strings.Text); end; ... end; end;
In MainForm:
var ts: TUniTabSheet; i: Integer; fr: TUniFrame; kd: IKeyDown; begin case Key of VK_F1..VK_F10: begin ts := PageCtrl.ActivePage; if ts = nil then begin EXIT; end; fr := nil; for i := 0 to ts.ControlCount - 2 do begin if ((ts.Controls[i] is TUniFrame) and (ts.Controls[i+1] is TUniSimplePanel) and (ts.Controls[i+1].Visible)) then begin fr := TUniFrame(ts.Controls[i]); BREAK; end; end; if fr <> nil then begin if Supports(fr, IKeyDown, kd) then kd.FnKeyDown(Sender, Key, Shift); end; end; end; end;
=> I have a Pagecontrol with tabsheets and on each tabsheet there are one or more frames, but only one frame is visible. And this active frame I search for and call FnKeyDown.
-
I will share when at PC again.
-
I have made an interface with a FnKeyDown procedure and every frame implements that interface. In Mainform I call in onKeyDown the interface procedure of the active Frame.
-
Use NavigateKeys property of the form that contains the frame.
-
Function ".click() " does not exist on this object.
But this works for me:
UniSession.AddJS('frmMain.miProgramm.child().showBy(frmMain.miProgramm);');
Thank you very much.
-
Is it possible to expand (open) UniMainMenu programmatically (after pressing F12 for example)?
-
-
I don't understand what you are doing exactly.
I have no example because I use long polling.
-
I think you must send in OnEvent a message to the websocket in browser and there you can use javscript and/or ajaxRequest(...).
-
<br> ???
-
-
Every frame must have an unique name.
xfrc.name := 'something unique';
example: xfrc.name := xfrc.name + IntToStr(Integer(xfrc));
-
Give the frame a unique name.
-
What is "large"?
You could use UniUrlFrame.
Create variable in session in unigui
in General
Posted