JohnLM

update.. I decided to image this setup in case I run into problems I can restore back to that condition. Now, I will attempt to install 12.

I must admit, this was the fastest install of Delphi 11.2 Alexandria and without any glitches--even mobile (android components) installed, as far as I can tell. It just works!

update.. It's too late, LoL. It did install. I just launched Rad Studio 11 and is up and running.

But the Rad Studio 11 dialog was still up and it had a blue [Get Started] button, or something Started. When I click it to test it, the Embarcardero registration dialog popped up asking for a serial, etc., and there is a Delphi 11 shortcut on my destkop.

Okay, I cancelled it. The install said: Install was successfully canceled.

Okay. It was at the installing features dialog box. at 5% for the 15 minutes probably. its so slow. I don't know what it is doing. This delphi 11 install for windows 10 that I started has a set of different install dialogs versus the one I installed for a win10 laptop back in Nov/2022. It is currently at the 'Acquiring Debugging Tools for Windows.." 5% progress. I will cancel this. It is taking too long and I have to get ready for work in an hour, as I work the night shift. I will try to install the 12 now while I get ready for work. The worst that can happen is that it fails the registration. I will have a hard time getting another bump for it this time.

For me, getting 12 installed has become frustrating. I just learned my registration limit has been reached. I now know that the limit is two. But what I wanted to mention is that the link(s) in the installations 'product registration' dialogbox (located at the bottom left corner) do not work. Actually, all the links in that dialog box do not work. When it opens my browser, I get "Hmmm... can't reach this page. Make sure you've got the right web address: http://www.embarcadero.com" and make a suggestion that I search Bing! Now, I will have to wait until next Monday to bump my registration because my rep(s) never answer email after 5 or 6pm. And when they do, its another 24 hours of waiting. Since my subscription runs out today, 11/10/2023, I will not be able to install 12 after all. Oh well.

When I do installations of new software, I always image my current hard drive with Reflect Macrium Reflect Disk Imaging and Backup software. If I have a new pc or latop/tablet, I do the following: 1. download the latest Macrium 2. get the new device up and running and make any special settings like * (like extra large mouse, set keyboard to fast typing, etc.) 3. then I perform an initial image of it as it is. 4. then I will install any special or new software, like Delphi 12 for instance. Once I have 12 installed, then I do another Macrium image of this new setup (hoping that the installation of all the necessary components all work, like mobile compiling to Android, etc). And, assuming that all that went well, I then run some compiling tests, specifically for Android. If that goes well, I'm done and have my master image. But if not, then I work out what the issue(s) are, fix them, and do a final Macrium image, test again, and done. Thus, this becomes my new master image for developing on this pc/laptop/tablet. Should I have any future problems, I can alway refer back to the main image and start over from that point. I will be doing this process shortly, for Delphi 12.

re: the webinar I wouldn't mind a Youtube video link once it's over.

@ Mike - I just came across this topic and thought I give you a thanks for the info. But.., I wish I could test some of the suggestions, including yours, but I can't since I lost my beep function when I disabled one of the windows services some time ago. I was trying to stop my HDD from being accessed so much. In that quest, I mistakenly removed the beep in windows (using win7) when I removed a service and I can not figure out how to restore that portion of the service to restore my windows beep. The only time I can hear the beep is when I click on the volume bar. I use the beep a lot in my apps. I sometimes call it with beep(x,y) (if I move the winapi.windows as the last uses position. If you or anyone knows of which windows service is responsible for the windows beep, please tell me so that I can go in an re-enable it. TIA

re: finding a bug report list Okay, I stand corrected. I found a link (for 'bug report') below, but it does not cover all versions, not that I need every single one. https://docwiki.embarcadero.com/RADStudio/Athens/e/index.php?search=bug+report&title=Special%3ASearch&go=Go

@ david - Yes. But the one's I've found (on google) are just random links I find and peek at but are not in a clean layout and not standard. And the link for the official 12.0 webpage does not list 'bug list report' or whatever its reference search naming is, during searches. https://docwiki.embarcadero.com/RADStudio/Athens/en/Main_Page

@Vandrovnik - thanks, I was wondering if there was a resource like this one.., and the rest (for previous versions) for that matter.

@Anders Melander Yep. I agree. I just didn't like the code name Yukon to be the product name and I thought that was going to be the name. But when I saw it given as Athens, I thought that was at least a better one.

Thank you! I am excited. I am looking forward to finding out what features have been added/enhanced/etc. Since I did not look at the feature list or video(s) (I don't know where it would be if one is posted) I am hoping for one in particular feature, though I doubt it will be in the 12 Athens. So far I have two installs: a 4gb laptop with win10 and 6gb laptop with win7. I mainly use the win7 laptop for this Delphi hobby. Both work fine with no known issues so far. But I would like to leave what I have installed already, but install 12 Athens on a recently purchased 6gb Chuwi 10.1" Hi10 1200x1920 intel celeron N4120 (gemini lake cpu) tablet https://www.ebay.com/itm/185886279327. - and/or possibly another new 8gb laptop 1920x1080 (icelake cpu). By the way, I do like the name they gave this one.

Hi. I'm looking for confirmation. When I purchased 12.2 Alesandria on November 11, 2022, I was told that 11.3 would be free as part of my subscription, which runs out in a few days. And now 12.0 Athens is here and available for download in "My Downloads" and still within my subscription period. So my understanding was that I would be entitled to 11.3 when it was to come out, and it did, a few months after my purchase, but I did not obtain/download 11.3 because I felt it did not have features/enhancements enough to interest me in installing it. Under "My Downloads" I see a link for ("RAD Studio, Delphi, C++Build 12.0 ISO", 7.12GB, 2012-11-07) I have not downloaded it because I am not sure that I am entitled to it. If I am entitled to download it, then I will update my subscription. So, I am asking for clarification on the download and subscription.

I finally found the method I've used for this process, using this method below and is also simple and quick, just a few ms two copy a 50k source, win7 laptop. This code snippet is from a small test project I made while learning some database processes. I have to grids, an sqlite (sqlitetable1), and a tfdmemtable (mtable2). This copies from the sqlite db/grid to the memtabble/grid. mtable2.Active:=false; mtable2.FieldDefs.Assign(SqliteTable1.FieldDefs); mtable2.Data:=SqliteTable1.Data; mtable2.Active:=true;

Using a string grid, (but I may also use a dbgrid later) how do I get the *column* number when I right-click on a column ? I've searched around but could not find the answers. Below, shows column 2 was right-click-selected. The purpose of this is to allow me to right-click on a column and a pop-up menu with options for (copy_column, create_table) will show. 1. I want to copy the text of the column to the clipboard. 2. or, create a table out of the selected column's text. (I know how to do these parts.) TIA

@Remey - your improved code snippet version is working much better than mine, thank you. It even captures my right mouse click.

Right now, I am focusing on getting the highlighting to work properly. I am able to do the following: 1. obtain the column number. 2. highlight the column in question (all cells including the header) (but that only works if I click the stringgrid cells, not the header--I want the header to be the initiator) But the above {2} is buggy. At program startup, the stringgrid highlights for column 0 (the fixed header section). The other issue-1 I am having is that I can only get the highlighting to work if I use the left mouse button. The stringgrid seems to ignore the Right-button click. No action is taken. And, issue-2 is that I cannot initiate the highlight when I click on the top fixed row header area. I need to be able to click that part only, not the cells. if button = TMouseButton.mbLeft then // success, but: if button = TMouseButton.mbRight then // fails I guess will have to first use .mbLeft, and then do .mbRight for the popup part. I will have to work that out if that is the route I will take. Here is the complete code that I managed to get working, though a bit buggy. I have to work out the pre-highlight it does on the fixed row header part at startup. There should be no highlighting at startup, not unless I click on the top fixed row header column. implementation var r,c: integer; MRect: TRect; ... procedure TForm1.sg1SelectCell(Sender: TObject; ACol, ARow: Integer; // sg1=stringgrid var CanSelect: Boolean); begin r:=arow; c:=acol; end; procedure TForm1.sg1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState); var Button: TMouseButton; begin if button = TMouseButton.mbLeft then // but .mbRight fails if (acol=c) then begin sg1.Canvas.Brush.Color:=clblue; sg1.Canvas.FillRect(rect); end; end; procedure TForm1.sg1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin if button = tmousebutton.mbLeft then begin sg1.Invalidate; mrect := sg1.CellRect(c,r); sg1drawcell(self,c,r,mrect,[]); // TGridDrawState = set of (gdSelected, gdFocused, gdFixed, gdRowSelected, gdHotTrack, gdPressed); sg1.Canvas.Brush.Color:=clblue; sg1.Canvas.FillRect(mrect); end; sg1.Invalidate; end;

I believe I have to do the highlight steps in an .MouseDown event of the stringgrid. If down, then highlight, and then during the .MouseUp, do/show the pop-up menu.

Actually, to be more precise, I want the whole column to show as highlighted and then show the pop-up menu.

@Achim - your technique works for the stringgrid as well, thanks. However, before I found your code above, I also found this method to obtain the col/row values with this code: var i: integer; ... procedure TForm1.sg1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState); begin i:=acol; edit1.Text:=inttostr(i); end; But my problem is trying to simulate the same as visually depicted in my original photo posted earlier.. if I right-click column 2, it would show like in the photo) and then I would call the popup menu, also shown in the photo.

Specs: Win7, Delphi 11.2, VCL I wrote some functions to convert string to byte and byte to string. These functions work. For testing, I added several tbuttons and a memo on the form and began testing my ideas shown below. function str2byte(str: string): TBytes; begin setlength(str,length(str)); result := TEncoding.utf8.getbytes(str); end; function byte2str(byt: TBytes): string; begin result := TEncoding.ascii.getstring(byt); end; usage: procedure TForm1.Button1Click(Sender: TObject); var strs: string; bytes: TBytes; begin bytes := str2byte('ABC'); // string strs := byte2str(bytes); // bytes memo1.Lines.Add(byte2str(bytes)); // show it strs := byte2str([68,69,70]); // bytes bytes := str2byte(strs); // string memo1.Lines.Add(byte2str(bytes)); // show it end; Now, I'd like to extend that to include an additional parameter to the encoding format (ansi, ascii, utf-16-big-endian unicode, utf-16 unicode, utf-7 and utf-8) as found here: https://docwiki.embarcadero.com/Libraries/Alexandria/en/System.SysUtils.TEncoding (And then later, possibly extend upon it by building a class component of it (and other library functions/procedures that I build)). The issue I am having now is how to give the parameters their name. I do not know if there are already built-in types for these and don't want to cause issues later on. But so far, I thought about using these: (_ansi, _ascii, _utf7, _utf8, _utf16be and _utf16u). Or, maybe create an enumerated list, i.e., type TMyEncoding = (_ansi, _ascii, _utf7, _utf8, _utf16be, _utf16u); And rewriting the above output snippet: type TMyEncoding = (_ansi, _ascii, _utf7, _utf8, _utf16be, _utf16u); function _byte2str(byt: TBytes; enc: TMyEncoding): string; begin case integer(enc) of 0: result := TEncoding.ascii.getstring(byt); 1: result := TEncoding.ansi.getstring(byt); 2: result := TEncoding.utf7.getstring(byt); 3: result := TEncoding.utf8.getstring(byt); // ... end; end; procedure TForm1.Button4Click(Sender: TObject); var strs: string; bytes: TBytes; begin bytes := str2byte('_ansi'); // string strs := _byte2str(bytes,_ansi); // bytes memo1.Lines.Add(_byte2str(bytes,_ansi)); // show it // strs := byte2str([68,69,70]); // bytes // bytes := str2byte(strs); // string // memo1.Lines.Add(byte2str(bytes)); // show it end; So I am looking for some advice/suggestions on how to implement the names for each of the encodings that will not interfer with Delphi's built-in names. TIA.

@ jonnyg - you are correct. I got side-tracked. The days of doing a fresh install on that win7 laptop are long gone now. I have too many large apps installed and other complicated issues that prevent me from doing that and is also the reason I have another laptop or two. They are all win10. I will eventually replace this laptop with one of those. I'm just not ready nor in any rush to make that happen as yet.