Ian Branch
Members-
Content Count
1352 -
Joined
-
Last visited
-
Days Won
3
Everything posted by Ian Branch
-
I have had a modicum of success with the above code. It at least runs. 😉 I am getting the error.. "Error connecting with SSL". 😞 I have the latest ssleay & libeay dll files in the directory.
-
Something in the Pacific region would be nice..
-
FWIW I can't reproduce the effect on my PC either. Win 11, 4k Monitor, D1.1.1, latest MMX. Ian
-
Hi Team, Is it possible to run a form from the project (.dpr) file, after the main form has exited?? i.e. after 'Application.Run' The reason is I want to have an absolutely last action taken after the Application is exited, if that makes sense?? Probably not. :-( I know I can put something as the last action in the OnClose event, or maybe even in the OnDestroy event.. Regards & TIA, Ian
-
Hi Dave, Yes that is another option. The form won't actually be showing it will be opening a database updating a record and then closing the database again. Then the form can close. I may well use a datamodule, I am just investigating the concept att. Ian
-
wuppdi Welcome Page for Delphi 11 Alexandria?
Ian Branch replied to PeterPanettone's topic in Delphi IDE and APIs
No problem. We have waited this long... :-) -
Hi Team, I have a Dashboard application that the Customer leaves up on their TV Monitor all day. I am not sure what type of TV Monitor it is. They used to leave it on 24/7 but I put an 8 hour time limiter on it. ;-) I'd like to mitigate any burn in by randomly moving/shifting the form. Is this possible? If so, how please? Regards & TIA, Ian
-
Hi Francois, Noted. It can't be. Not probable but not impossible. They can always drag it back to the center of the screen if they like. ;-) Regards, Ian
-
It would be if I had any say in it.. Lajos, I took your suggestion and made it into this.. procedure TMainForm.MoveWindowTimer(Sender: TObject); var ws: TWindowState; l: TRect; iLeft, iTop: SmallInt; begin ws := WindowState; l := BoundsRect; iLeft := RandomRange(-10, 10); iTop := RandomRange(-10, 10); // if ws = wsMaximized then WindowState := TWindowState.wsNormal; SetBounds(l.Left + iLeft, l.Top + iTop, l.Width, l.Height); Repaint; end; Works perfectly. Regards & Tks to all. Ian
-
Hi Francois, Tks. I was hoping it would be something as simple as that. Regards, Ian
-
Hi Team, I run an App inactivity/idle routine in the background. The objective is that if the App is idle, no keyboard or mouse activity for x minutes, the App closes. Closure is generally by closing the Main form. So, I was wondering, what does Delphi do if you are in a second form opened from the main form when the idle triggers? Does it formally/gracefully close the second form first, and by extension any other forms open in the App, then close the main form, or does it simply close the main form and crash the second, and any other, form? I guess a follow up to that, if it does close other forms gracefully first, what dictates the order of closure? Regards & TIA, Ian
-
Ahhhh. Tks Pat.
-
Hi Pat, Good point. I'm not sure I understand what you are saying here?? I have no special handling in the sub-forms. I have the CloseOpenForms being called in the FormClose of the MainForm. e.g. procedure TMainForm.FormClose(Sender: TObject; var Action: TCloseAction); begin // CloseOpenForms; // Close any open forms. // DBC1.CloseDataSets; // Close any open tables/Queries. // DBE1.Close; // Close the DB Engine // end; In the context of this, is a Datamodule considered a Form? Ian
-
Hi Team, I have worked up the following code.. procedure TMainForm.CloseOpenForms; var TheForm: TForm; I: Integer; begin // for I := 0 to Screen.FormCount - 1 do begin TheForm := Screen.Forms[I]; // {$IF Defined(ELogging) or Defined(Codesite)} LogMessage('Form Name = '+ TheForm.Name); {$ENDIF} // if TheForm.Name <> 'MainForm' then TheForm.Close; // end; end; It turns out that MainForm is the first in the order of Screen.Forms so if I don't filter it out I end up in a loop. 🙂 Seems to work well. Open to any suggestions to improve it. Regards, Ian
-
wuppdi Welcome Page for Delphi 11 Alexandria?
Ian Branch replied to PeterPanettone's topic in Delphi IDE and APIs
Here is the 10.4 plug in, it may work in 10.1.pkgWuppdiWP_DX104D.bpl -
wuppdi Welcome Page for Delphi 11 Alexandria?
Ian Branch replied to PeterPanettone's topic in Delphi IDE and APIs
Yes. In the left pane you could create sub folders that contained all the projects related together. That way I had several sub folders, one for each of my main Project groups, within which were the individual projects for that overall group. Not to be confused with Delphi's Project Group files, which also went in there. This kept the right hand pane filled with only those project files related to the overall Project. This was to me the greatest benefit of wuppdi. Project files & Project group files were physically moved from the right 'standard' projects pane to the new project group folder. Unfortunately I no longer have an older version of Delphi with the original Wuppdi installed to show you. Perhaps someone else here could post an image?? Perhaps something nice, but not actually needed, would be the ability to sort the files in the right pane. Sort by Projectgroup then project. Just a thought. -
Uwe & Peter, thank you for your responses. I had suspected as much. Peter.. And how does one do that?? I think I have seen that somewhere but I don't recall where. 😞 Is it done from within the MainForm OnClose event? Regards & TIA, Ian
-
wuppdi Welcome Page for Delphi 11 Alexandria?
Ian Branch replied to PeterPanettone's topic in Delphi IDE and APIs
I take it the ability to create project folders is still coming?? -
Hi Team, D11.1.1. I am trying to create my own local .bpl with some odd components I have picked up over time. I have the .bpl building and installing OK. The components appear and work as desired. The issue I have is that the component .dcu files keep getting rebuilt every time I build an App with them in it. 😞 I thought that I could just relocate the relevant .pas files and the .dcu files in the local .bpl directory would get used but when I go to build the Apps Delphi tells me it can't find the files, presumably the .pas files because when I put the .pas files back with their .dcu counterparts all is fine. I have clearly missed some nuance in constructing my .bpl or something in the component files. Appreciate some guidance/education... Regards & TIA, Ian
-
:-) Which is what I am trying to implement.
-
Hi Team, Does anybody know the fate of Components4developers? My subscription is coming up for renewal soon and I can't raise their web site. :-( Regards & TIA, Ian
-
Ahhh. Tks Stefan.
-
Cheers.
-
Hi Team, Win 11, D11.1.1., 32bit Apps. I run two 4k screens, great for productivity. I have noticed that with the Apps I create, their Task Bar icon only appears in the primary Task Bar, even though I have moved the App to the Secondary screen. :-( With most, if not all, of the other standard Win Apps I use, the App icon moves between screen task bars as I move them from one screen to another. Is there some Delphi or WINAPI setting I need to set? Regards TIA, Ian
-
As all mine were/are. 😉 Cheers.