Jump to content

Ian Branch

Members
  • Content Count

    778
  • Joined

  • Last visited

  • Days Won

    2

Everything posted by Ian Branch

  1. Ian Branch

    Array within an array??

    Hi Team, Need some help/guidance. I have an array of labels 12 x 7. These I can address by something like 'Matrix[0,1] to Matrix[12,7]'. Each label will have an integer value, and colour integer associated with it. e.g. [124, 255] the 124 in this case to be converted to string for the label's caption. How do I define an array, possible an array within a matrix, to accommodate this? Having defined the array how do I address an individual item in one of the label's array? Regards & TIA, Ian
  2. Ian Branch

    Version check error???

    Hi Team, Using D11.1.1. Lately, seemingly after I installed the latest debug patch I have randomly at start up been getting a 'Version check error.'. It happens after all the libraries/plug-ins have loaded and just before the IDE actually displays. Clicking OK it disappears and everything seems normal. It doesn't happen every time, probably one in 5 starts of Delphi. I tried disabling all the plugins but it still happens. Anybody else experience this? Any thoughts/suggestions? Regards, Ian
  3. Ian Branch

    Version check error???

    Just an update. Turned out the culprit was RVMedia v 9. One brownie point for Dave. ;-) The product itself is fine. When it starts up it does a version check to 'home'. This hiccups from time to time. Sergey is looking into it. In the mean time this check on start up can be turned off by right click any RVMedia component at design time and choose “Check for RVMedia update”. In the version check dialog, uncheck “Check on start” checkbox. As I said, there is nothing wrong with the product itself during design & run time, just the hiccup at Delphi start. HTH somebody else. Ian
  4. Ian Branch

    Delphi 11.1 Stuck While Opening Project

    I echo Peter's words but in Win 11.
  5. Ian Branch

    Array within an array??

    Because I wasn't seeing it and getting more and more confused so I decided to take the easy way out. I put it down, had a coffee, and came back to it. I now have it.. type TForm26 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } type TLabelRecord = record iValue: Integer; iColor: Integer; end; type TLabelMatrix = array[1..12, 1..7] of TLabelRecord; public { Public declarations } end; var Form26: TForm26; implementation {$R *.dfm} procedure TForm26.Button1Click(Sender: TObject); var LabelRecord1, LabelRecord2: TLabelRecord; LabelMatrix: TLabelMatrix; begin LabelRecord1.iValue:= 123; LabelRecord1.iColor := 234; LabelMatrix[1,1] := LabelRecord1; // LabelRecord2 := LabelMatrix[1,1]; ShowMessage('Value = '+LabelRecord2.iValue.ToString); ShowMessage('Color = '+LabelRecord2.iColor.ToString); // end; Thank you for your patience & guidance. Ian
  6. Ian Branch

    Array within an array??

    I surrender. I have gone to two arrays.. LabelValue: array of array of Integer; LabelColor: array of array of Integer; Thank you for your suggestions/advice. Ian
  7. Ian Branch

    Array within an array??

    Hi David, OK. I think I understand. So now I have.. type TForm26 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } type TLabelRecord = record iValue: Integer; iColor: Integer; end; type TLabelMatrix = array[1..12, 1..7] of TLabelRecord; public { Public declarations } end; var Form26: TForm26; implementation {$R *.dfm} procedure TForm26.Button1Click(Sender: TObject); var rRec: TLabelRecord; mLabelMatrix: TLabelMatrix; begin end; But how do I address one element of rRec within one element of mLabelMatrix?
  8. Ian Branch

    Array within an array??

    Hi David, I figured it was going to be a multidimensional array of record. So I tried the following.. type TForm26 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } type TLabelRecord = record iValue: Integer; iColor: Integer; end; LabelMatrix = array of array of TLabelRecord; public { Public declarations } end; var Form26: TForm26; implementation {$R *.dfm} procedure TForm26.Button1Click(Sender: TObject); begin SetLength(LabelMatrix, 11, 6); end; Delphi tells me the SetLength code in the Button Click is wrong, object (LabelMatrix) cannot be passed as a parameter, but I don't know why. 😞 I don't care if it starts at 0 or 1, whatever the default is. I don't know what to do from here.. 😞
  9. Ian Branch

    TaskMessageDlg('.... behind form?

    Hi Guys, I am only going on hearsay reports from Users att, I haven't experienced it myself, yet. Is there any reason a TaskMessageDlg('..... would appear under/behind a Delphi form? Users have reported that they have experienced this. Seems the App appears to freeze, one User happened to have his form just to one side of the screen and saw the dialog appear half exposed and half behind his form. :-( He responded to the dialog appropriately and all was good. I asked a couple of other Users to move their form aside slightly and they have seen/experienced the same thing. Unfortunately, it is not consistent. :-( I have asked the to try to do a screen capture and send it to me but they haven't as yet. :-( Hence the opening 'hearsay'. Any thoughts/Suggestions? Regards, Ian
  10. Ian Branch

    Freeing Show v ShowModal??

    Hi Team, D11.1.1. I have used the following construct in the calling/main form extensively.. // ChangesLogForm := TChangesLogForm.Create(self); // try ChangesLogForm.ShowModal; finally DBC1.CloseDataSets; FreeAndNil(ChangesLogForm); end; // for showing Modal forms. I now need to show several forms at the same time so I moved to this construct.. // ChangesLogForm := TChangesLogForm.Create(self); // ChangesLogForm.Show; // and added 'Action := caFree;' in the OnClose of the forms. Is this safe/correct/acceptable? Are there any -ve consequences? Regards & TIA, Ian
  11. Ian Branch

    Freeing Show v ShowModal??

    Noted. Tks.
  12. Ian Branch

    Freeing Show v ShowModal??

    Thank you David & Attila, I just want to be sure. :-) The CloseDataSets was valid in the original code where only one sub-form was open at a time, however it isn't appropriate where multiple forms are going to be open. The relevant dataset is closed in the sub-form before the actual Close. Regards & Tks again, Ian
  13. Ian Branch

    Detect Windows shutdown?

    Hi Team, D10.3.3. I want to detect Windows shutdown in Win 7 and Win 10 in order to ensure data is saved before the App gets clobbered. I have tried a few examples using.. { Private declarations } procedure WMQueryEndSession(var Msg: TWMQueryEndSession); message WM_QUERYENDSESSION; plus its associated routine, without success. I suspect the above may be OK in Win 7, haven't tried it yet, but not for Win 10. Anybody got code working as desired in Win 10? Regards & TIA, Ian
  14. Ian Branch

    Detect Windows shutdown?

    Hi Mahris, Yes, since I started this I discovered and no use OnCloseQuery. Thank you for the follow up. Ian
  15. Ian Branch

    Appreciate the 'extra mile'..

    Hi Thomas, I very much appreciate your heads up in the build script for D2007 in regard to the missing 'Borland.' files when Win 11 updates, and the provisioning of said files. It has saved my bacon several times recently. 🙂 Regards, Ian
  16. Ian Branch

    Version check error???

    So, I shut my modem/router down for a couple of minutes and I still got the intermittent error. First time it errored, the second it didn't. That suggests something else is afoot... I really would prefer it to be consistent, i.e. happen all the time, then I have a better chance of isolating it.
  17. Ian Branch

    Version check error???

    Hi Dave, No I didn't. It didn't occur to me that component packages would be doing what was possibly an online version check. This would be problematic if you weren't online. Actually the whole version check, if done online would be problematic if not online. Ian
  18. Ian Branch

    wuppdi Welcome Page for Delphi 11 Alexandria?

    @Daniel Whither goest WUPPDI for D11??
  19. Ian Branch

    Parnassus Bookmarks for Delphi 11 Alexandria?

    It was an error dialog. No, I don't have a screen shot. Windows 11. Delphi 11.1.1. I clicked the error dialog and the old Delphi closed and the new came up. Just to be sure all as OK I closed and restarted Delphi. No issues since.
  20. Ian Branch

    Parnassus Bookmarks for Delphi 11 Alexandria?

    Bookmarks installed. The restart had a failure but closing & restarting all fine now.
  21. Ian Branch

    RBuilder issue with pipeline

    Noted. Tks.
  22. Ian Branch

    RBuilder issue with pipeline

    Hi Bill, I am pleased. What was it? Ian
  23. Ian Branch

    RBuilder issue with pipeline

    Ummm. OK. Then I am out of my depth. I have never created a ret programmatically. I would suggest getting on the RB Forum and asking there.
  24. Ian Branch

    RBuilder issue with pipeline

    No. Umm. Are you creating the report totally in code or using a version of the Users App?
×