Pat Foley
Members-
Content Count
403 -
Joined
-
Last visited
-
Days Won
2
Everything posted by Pat Foley
-
Questions about Application and Package .dproj files.
Pat Foley replied to Pat Foley's topic in Delphi IDE and APIs
That and reading the link got me running again. In the past Before 11 I tried have design only. I was not recompiling in 64. Thanks Pat -
Delphi 11.3 unusable due to full-build-requiring onslaught of F2084 "Internal Compiler Errors" from minor source modifications
Pat Foley replied to PaulM117's topic in Delphi IDE and APIs
So, when error 2048 shows after switching platforms; Just switching back clears it. Which is pretty cool that 11.3 can recover. The Syntax check magic does not work as well when installing a package. That needs to be compiled to lose the vintage dcus/BPL. In my case ignoring compiler warning about implicit files in a package build results in error 2048. I just don't know how make separate include files for the different platforms and perhaps csDesigning mode bypass so procedure not used in design mode is needed. -
Delphi 11.3 unusable due to full-build-requiring onslaught of F2084 "Internal Compiler Errors" from minor source modifications
Pat Foley replied to PaulM117's topic in Delphi IDE and APIs
When I switch from 64 to 32 I use the syntax check to (alt-p-s) Before the compile. The issue in a package. Pat -
Rx11.3: IDE project tree disappears suddenly ( empty window )
Pat Foley replied to Rollo62's topic in Delphi IDE and APIs
I have the opposite problem my *.proj have 40k worth of Ios and Android deployment yuch and I am using VCL and little FMX. However, when switching from 32 to 64 to prevent a bad compile, I use the syntax check Alt-p-s to freshen the DCUs. Also, I try to load forms at runtime to reduce the files needed to be listed in .dpr, .dproj and .dproj.local. -
Try dropping a ControlwithmarginsSet.AlignWithMargins :.= True and see what happens! // the margin property isn't just for making porting to Lazarus a chore.
-
Delphi 11.1 + patches - No debug source / breakpoints?
Pat Foley replied to Lars Fosdal's topic in Delphi IDE and APIs
Ok New project set as 64 set as release run as debug shows threads show unit works either way 🙂 -
Delphi 11.1 + patches - No debug source / breakpoints?
Pat Foley replied to Lars Fosdal's topic in Delphi IDE and APIs
You must have some camelCase where D likes PascalCase best. I able to drill in Control select with program running. It takes a day or two of pruning the write cache and reboot or two for changes to keep. Big jobs usual have dcu units paths set. -
Delphi 11.1 + patches - No debug source / breakpoints?
Pat Foley replied to Lars Fosdal's topic in Delphi IDE and APIs
Guess 1. windows freshens memory shuffle for big program that is grabs files from the files needing to written to disk 3.5 gigs on my machine. This feature saves say 3 minutes on reboot buts retains the cache wreck 😞 Fix Kill some msedgebrower.x off vs reboot Guess 2. Windows swap file uses compressed memory. This compressed memory is shuffled in/out? on big job. Fix shut off the swap file. Guess 3. Run apps like D and edge in full screen so Windows can manage memory for running apps better. Knowing the above in 64 yields a running program with clickable menu items in Ide. Here's what I did to find a problem switching to win11 machine I must have set build with runtime packages under packages. clicking find unit under Refactor yields what the IDE knows. The center forms show before after. Guess 4. ctrl Mouse down is to be shut down when App is running? IDE He (or She let's say D for Diapered) must think the program is compiled and running! This is on win 11 D11.1 -
You could try this if you want a form without a dfm.  MyForm := MyForm.TCreateNew(Self); //was MyForm := MyForm.Create(Self); // defaultDataGrid := Tdbxx.Create and set //Note add alignment after pix Otherwise just autocreate your cardform. As other's have mentioned what is it. procedure TfrmGettingStarted.Button3Click(Sender: TObject); var boardForm:TForm; boardGrid: TDBGrid; begin boardForm := TForm.CreateNew(Application); boardGrid:= TDBGrid.Create(boardform); boardGrid.Parent := boardForm; boardGRid.Align := alClient; boardGrid.DataSource := dsProducts; boardForm.Show; boardGrid.Show; end;
-
procedure TfrmGettingStarted.Button1Click(Sender: TObject); var grid, grid2: TDBGrid; //refs to grid instances in forms` Pop2: TformPop; //for example purposes begin grid := formPop.grdProducts; //2 //allready did 1 grid.DataSource := dsProducts; //3 hookup //grid.Show; //not working in 11.1 grid.Parent.Show;//4 Pop2 := TformPop.Create(Application);//1 grid2 := Pop2.grdProducts; //2 grid2.DataSource := dsCategories;//3 //grid.Show; grid2.Parent.Show;//4 end; My thoughts are to change the Quoted to something like the above. 1. make the forms h 2. Add data grid references to DM at start up. 2.1 grid2.magically adjusts to data source some how 3. Set date grid reference data source. 4. Show using parent lets the DM to not need these forms in uses clause! It only needs to know what DBgrid is. 5. Ewe has blog articles on the nuances needed using DM with multiple edit forms~ This example just shows the data. 6. Added to an Example in Samples to verify.
-
white space is ignored. Change a line of code and see what happens or add a method or Property to get a full rebuild. Besides allowing the IDE to compile only the changed code only the warnings in the unit recompiled will be lit. It would nice though if the mapfile viewer would get the measles for warnings like VS.
-
How to open a file in the already running IDE?
Pat Foley replied to aehimself's topic in Delphi IDE and APIs
Why not catch caption. Don't tell anyone I'm working up a log program 12/6/2022 6:26:47 AM= Windows.UI.Core.CoreWindow Windows Default Lock Screen 12/6/2022 6:26:54 AM= Shell_TrayWnd 12/6/2022 6:27:09 AM= TMain Main 12/6/2022 6:28:29 AM= TAppBuilder ProgramLogger - Delphi 11 - AppMain [Running] [Built] 12/6/2022 6:29:38 AM= TMain Main 12/6/2022 6:29:39 AM= TAppBuilder ProgramLogger - Delphi 11 - AppMain [Running] [Built] 12/6/2022 6:30:28 AM= Chrome_WidgetWin_1 View program flow and calls to help understand code? - General Help - Delphi-PRAXiS [en] and 3 more pages - Personal - Microsoft? Edge -
View program flow and calls to help understand code?
Pat Foley replied to SteveHatcher's topic in General Help
That kind of looks like DFM source. If you start in debug layout the Stack Trace and local variables on left slide outs could looked at breakpoints set. The VCL uses component streaming to build the IDE design window these components are streamed into the compiler to make an executable. The following example would be pasted on a form. Click on Button1 and assign a click event. compile the program. Copy all the text in memo and paste onto form in IDE design. Stop the exe and recompile. Try the Hello button it will be hooked to your button1click. Note may to remove margin=4 on older D Another feature is using control key down and mousedown on TForm will drill down to TObject. object Panel1: TPanel Left = 380 Top = 70 Width = 371 Height = 341 Margins.Left = 4 Margins.Top = 4 Margins.Right = 4 Margins.Bottom = 4 Caption = 'Panel1' TabOrder = 0 object Button1: TButton Left = 140 Top = 250 Width = 94 Height = 31 Margins.Left = 4 Margins.Top = 4 Margins.Right = 4 Margins.Bottom = 4 Caption = 'Button1' TabOrder = 0 OnClick = Button1Click end object Memo1: TMemo Left = 90 Top = 20 Width = 231 Height = 111 Margins.Left = 4 Margins.Top = 4 Margins.Right = 4 Margins.Bottom = 4 Lines.Strings = ( 'object btn5000: TButton' ' Left = 140' ' Top = 250' ' Width = 94' ' Height = 31' ' Margins.Left = 4' ' Margins.Top = 4' ' Margins.Right = 4' ' Margins.Bottom = 4' ' Caption = '#39'Hello'#39 ' TabOrder = 0' ' OnClick = Button1Click' 'end') TabOrder = 1 end end -
1. Use meminifile.setstrings(default Strings to load program when external data not found) 2. The exe carries all the modes publish, editor, writer. The inifile and email of user loads the controls needs for that user. 3. The controls are bound when the program reads the "script". Bottom up or data driven loading. I used Expression parser by Egbert van Nes. 3 times easier than JS and CSS. Plus that pseudo business 4. The EventLeader waits for callbacks from remote API to update the UI. 5. Time Estimate TE 10 hrs. but building each form as exe and setting into app saves 1 hour per unit * 4. The eventLeader sheds its skin with a dot {.R *dfm} and classed as TwinControl was TForm. 1 hour plus 1 hr to write the script for each task's controls and interactions. Ability to adjust in the field without a recompile is worth a few hours. Scott Hanselman's blog might be a good source for info on running and setting web site.
-
Windows VCL application pauses when window is not focused...
Pat Foley replied to DavidJr.'s topic in VCL
Gamers and workers use various apps to keep windows up. Not sure of safety of something off the web. -
Windows VCL application pauses when window is not focused...
Pat Foley replied to DavidJr.'s topic in VCL
Could you warp that big procedure with if busy exit; busy := True; ...busy := False to keep the timer updating the UI. About 6 weeks ago M$ adjusted the TThread to idle down to once per second...to save energy on blade servers. Not recalling the source of that statement. -
Whynot? UItext := Format('%f.%f', [MN div 10, MN mod 10]); MN := round(anumber*10); when MN is Integer . _Trunc or _Floor may be available in your Script as well.
-
(replicable w/ source) Why do I always get Access Violation every time I rebuild ANY component? (Current solution is to Restart Delphi.. Why??)
Pat Foley replied to Al T's topic in FMX
I simply select the custom control cut and repaste that should keep positions and events intact when "resetting" to see a small change after "tuning". For a single control I don't mess with the library rebuild. Would that work for you. OT on your plugin would a @plugin work? -
Installation of fresh Delphi 11.2 fails: Exception in module rtl280.bpl
Pat Foley replied to Hans♫'s topic in General Help
Deleted -
Very good! Could the task dialog be readily parented to say a panel aligned to top of a form. A "ShowModal" call would show the panel, when panel is assigned as parent. Pat
-
class? function TVST3Controller.GetEditorClass:TForm;? begin result:=NIL; end; function TVST3Controller.CreateForm(aParent: TForm):TForm; //pass VAR FeditorForm:TclassedForm;// .. else result:=FeditorFormClass.CreateParented(aParent);//HWND(parent)); // HWND not in FMX FMX doesn't use windows handles AFAIK. It's useful to know that FMX does not have a TWinControl. Not liking that these are not class methods. Pat
-
I was able to refactor in 32 for first time in the twenties and then refactor the refactor in 64 🙂. While watching the runtime I selected the Class l.ookup and 232 warnings came up! I am running 11.1 on win 11 home.
-
Shift-Ctrl-F select current unit puts clickable lines in Messages view. Would that be a solution, Pat
-
how would you do this? Pass API params from UI into API unit
Pat Foley replied to David Schwartz's topic in General Help
/*----In EventModule---*/ Edits: Tlist<TtextPair>; // business logic here /*----elsewhere in UI realm--*/ EB.Edits.add(TtextPair.create(uf.Edit2,uf.lbleditErrors)); //uf ~ TForm //source Remu Lebeau response https://stackoverflow.com/questions/64145742/cannot-change-tedit-text-in-delphi. TtextPair = Tpair<TComponent, TComponent>; //edit Timer scans the cached edits length and does stuff. OT I been running some JS thanks for those posts on TMS and TypeScript. -
How can i have my sphere act as a canvas in viewport
Pat Foley replied to Linuxuser1234's topic in FMX
Looks like a good start 🙂 Here's my stab at it. I viewed some JavaScript source and looked at the shader code in older Emba' blog article. What is your target and what video card... That is your business. Another approach is taking aircraft ground school classes about 5/8 weather plus the instructor can provide a flight to point what various clouds look like. This has Southern Oscillation Index SOI plus NOI drawn on the bitmap. Remember spherical triangle angles add to more than Euclidean triangle.