

JohnLM
Members-
Content Count
358 -
Joined
-
Last visited
Everything posted by JohnLM
-
Installing the wrong Delphi version on new tablet - RESOLVED
JohnLM replied to JohnLM's topic in Delphi IDE and APIs
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.- 9 replies
-
- delphi
- installing
-
(and 2 more)
Tagged with:
-
Installing the wrong Delphi version on new tablet - RESOLVED
JohnLM replied to JohnLM's topic in Delphi IDE and APIs
Okay, I cancelled it. The install said: Install was successfully canceled.- 9 replies
-
- delphi
- installing
-
(and 2 more)
Tagged with:
-
Installing the wrong Delphi version on new tablet - RESOLVED
JohnLM replied to JohnLM's topic in Delphi IDE and APIs
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.- 9 replies
-
- delphi
- installing
-
(and 2 more)
Tagged with:
-
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.
-
Copy table data between two different databases.
JohnLM replied to Jeff Steinkamp's topic in Databases
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
-
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;
-
@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.
-
Suggestion of naming convention for enumerators
JohnLM posted a topic in Algorithms, Data Structures and Class Design
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.
-
@ jonnyg - I have a Windows 10 laptop 64GB (eMMC) and 4GB of ram, and with Delphi 11.2 installed and running fine. I had stopped using it because it ran down my remaining hdd (eMMC) space down to about 400mb, but recently I learned that I regained some of it back and now have 2.5GB space left, more than enough to continue my small casual Delphi hobbies. I use my win7 laptop as my main workstation. It has XE7 and D11.2 on it. I sometimes run both side-by-side when necessary. I have no problems with D11.2, except for that recent rare occasion I just mentioned in my previous post.
-
Specs: Delphi 11.2, Win7 My experience thus far with D11.2 under Win7. . . I have worked in Delphi for many years. I can't remember ever having the IDE crash (or freeze) on me, ever until I started working with Classes and Generics. Granted, I am new to that area. But we all have to start somewhere, and crashes/freezes will happen when using advanced areas of coding. Now that I am in the classes and generics area of programming I am finding that the IDE will crash or freeze often, though mostly in access violation territory while closing the app as I learn, etc. For example, yesterday while testing some code, the IDE froze and was unresponsive. And I could not close down the faulty app in Task Manager. After 10 minutes of frustration, I learned that the DSP had crashed (it was showing 25% usage on my win7 laptop in Task Manager--the 25% CPU value is the default value for when an app or something for that matter has crashed or become unresponsive) I could not do anything in Delphi and/or the App in question until I killed the process for the DSP. Then, I had to shut down Delphi and reload that project. in my unique case, I discovered that Delphi 11.2 no longer works properly with the Class/Generic app I was working with. It constantly crashes with access violations. In order to resolve this, I have to shut down my laptop completely. It would not be such a problem if my laptop did not take 40 minutes to boot up--a situation that I have not been able to figure out how to resolve.--it used to boot up in under a minute when brand new. I don't know where nor when exactly this long boot-up started. Anyway. So crashes like this I can't afford to have with a 40-minute bootup every time I encounter this sort of major Delphi crash. But this type of crash is difficult to document exactly how it happens in Delphi.
-
Suggestion of naming convention for enumerators
JohnLM replied to JohnLM's topic in Algorithms, Data Structures and Class Design
Yes, this is for process and learning. I am learning about how to build Classes and Generics, and this idea came to me and I went with it to see how far I would get.