Search the Community

I have a form with a treeview, which can be browsed using the arrow keys. Once an item in the treeview is selected, hitting an "OK" button on the form (which has the modal result mrOK) will close the form, and load the currently selected item into the app. What I want to do is assign VK_RETURN (which I believe is the [Enter] key...?) to the OK button, so that when browsing the treeview using keys, the user can just hit Enter/Return to load the currently selected item. btnOKClick has its own procedure, detailed here: procedure TFLevelSelect.btnOKClick(Sender: TObject); begin WriteToParams; ModalResult := mrOk; end; I can enter "WriteToParams;" into the Treeview's OnKeyDown procedure, but this doesn't actually have any effect until the OK button is pressed. So, one option is to tell the OnKeyDown procedure to also "virtually press the OK button" (which I'm not sure is even possible...?) - this would be my preferred method, if it can be done. Another option is to assign a hotkey to btnOKClick. The only problem with this is that there are multiple other buttons on the form, all of which already respond to [Enter] when Tab-selected. If I assign [Enter] as a hotkey to btnOKClick, then [Enter] either can't then be used for any of the other buttons on the form - or, worse, the app will crash because it won't know which button to press if the Tab is on a different button than 'OK', and the user hits [Enter]. Any and all suggestions/help welcome. I apologise if I haven't provided any necessary information.

Hi all, I'm running RAD Studio 10.4 Version 27.0.40680.4203. I daren't update it in case I can no longer compile the project I'm working on after the update. Debugging breakpoints have always worked, but today for some reason they stopped working. Now, when I enter a breakpoint (red dot at the left of the line), the red dot gets a cross ('X') in the centre of it and the program doesn't break at the appropriate point when running in Debug mode. As far as I know, I haven't changed any project settings since being able to use breakpoints and now not being able to use them. Any ideas...? Apologies if I haven't provided any necessary information.

Hi all, The app I'm working on has a tree view which displays relevant info when an item in that tree is clicked with the mouse. It's also possible to scroll through the treeview list items using the arrow keys (which is obviously quicker than point-clicking every item to get the displayed info), however the info is not displayed when using the arrow keys. It's necessary to actually click an item to get it to display the info. Here's the relevant procedure: procedure TFLevelSelect.tvLevelSelectClick(Sender: TObject); begin SetInfo; end; As you can see, SetInfo is only called when the tree view is actually clicked. Do I need to add procedures for VK_DOWN and VK_UP which call this function, or can the hotkeys be added in here somewhere? Many thanks, Will

Hi! I am developing a simple editor application in which you can type Pascal code and click the compile button, which will connect cmd.exe in the background and compile a .pas file via freepascalcompiler. I have two separate TMemo components. one for writing source code and a second read-only component for showing compilation messages. To sum up, I want to execute the "fpc file_name. pas" command in the background and then grab the compiled messages and display them on the UI. How can I achieve such behavior? https://github.com/gchapidze/fmx-pascalIDE

Hi! I am new to Delphi, but I think I am getting something done! I am not quite sure what I am doing wrong, but this should be correct in Java! I have the corresponding results shown in the debugger at the third iteration! Can anyone point out what I am doing wrongly? (Source Code: MyCollections.pas)

I have a component in a Delphi package. The component contains a TTimer. When I manually create an instance of the Component, everything works fine. But when I drop the component on my form, everything works until the component tries to activate the timer. When the component attempts to start the timer with "FTimer.Enabled := True;", the access violation occurs. The following code from Vcl.ExtCtrls is called with Value=True but as soon as "if Value <> FEnabled" executes, the access violation occurs. procedure TTimer.SetEnabled(Value: Boolean); begin if Value <> FEnabled then begin FEnabled := Value; UpdateTimer; end; end Is this a bug or am I overlooking something? Thanks

My Delphi programs with the P4D-component PyEmbeddedResEnvironment310 run like a charm, as long as I keep them on my own machine (W11 + Delphi 11.3 Enterprise). On the target machines (W10), everything looks good: the embedded "3.10" environment is exactly the same, and contains all the required python libraries. Besides, I have the registry key "Computer\HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Environment Variables" adjusted through the batch file: "reg_env.bat", from P4D github. In there, "PYTHONENVIRONMENTDIR" reads "C:\Program Files\MyProgram", where the folder "3.10" stands aside the program executable (I also tried "C:\Program Files\MyProgram\3.10" by the way). Note that the programs work as normal, except for that the Python scripts don't work. No errors occur. Just no effects. What is it what I do wrong? Many thanks ahead. Jan

I am trying to access the on download completed event in TEdgeBrowser to no avail. Has anyone been able to access these events? I have attached my current attempts to access the API for downloads. GWSEdgeAPI.pas

Hi! I read 200 pages of Marco Cantu's book on Delphi, which may be good for a particular reader, but for beginners, IMO, it lacks in-depth explanations and only skims a topic a bit. Anyways, I am interested in the book How to Program Effectively in Delphi for AS/A Level Computer Science by Dr. Kevin Bond. Is it a good book for beginners?

.dfm .pas file icons disappeared after installing Delphi 11 and uninstalling Delphi 10.4 does anyone know how to solve?

Hi! I have followed the installation manual for Spring4d. Cloned the repository and ran the build.exe, without running tests, with the Update Registry option checked. Units and classes are definitely indexed because I can go to them with ctrl + click, but I am getting these weird errors: 1) Could not compile unit Spring 2) File not found Spring.inc . How can I solve it?

using Delphi 11.2 Android 64 bit I Have an App which reads a geo referenced pdf file and overlays it on a map worked fine on earlier versions of android but in the later versions of android when I go to file selection no files are shown I presume this is caused by the permissions changing have requested read and write external permissions but still dont see them and tried both shared documents and shard downloads paths I Use a simple file selection screen to list eligible files and select any ideas of what I need to do to make the files visible from the downloads folder would be greatly appreciated Thanks in advance Ian

https://docwiki.embarcadero.com/RADStudio/Alexandria/en/Indy say... The RAD Studio CHM help of the Indy components is not provided when pressing the F1 button. However, RAD Studio provides a third-party help. Click Help > Third-Party Help > Indy Library Help to acces the Indy third-party offline help. But its not available here? How to link the indy help here?

i just create rest service with authoticate entry. the default login form look like this : how can i change the login form as i want and control the form shape? lables, headers, positions

I've written this piece of code ... type def_dip_value=record dip_val:word; dip_name:string; end; tdef_dip=record mask:word; name:string; number:byte; dip:array of def_dip_value; end; ... Everything goes fine, but when I try to declare some const like this... const my_dip:array [0..1] of tdef_dip=( (mask:$f;name:'name1';number:16;dip:[(dip_val:$2;dip_name:'name1'),(dip_val:$5;dip_name:'name2')]), (mask:$10;name:'name2';number:2;dip:[(dip_val:$10;dip_name:'name3'),(dip_val:$0;dip_name:'name4')]) ); ... Cannot compile, delphi fails with error 'Undeclared identifier: 'dip_val' I've tested the same code on Free Pascal and works fine, so, what I'm doing wrong? Any idea?

Delphi XE7/11, VCL, win7 Hi everyone. I've got a problem here. Because of the angle that I have to have my laptop screen at, the image when playing videos is too dark. I can barely make it out. I've learned that I can adjust the color brightness level in windows. I may also need to custom change the other colors (contrast gamma hue sat) as well, and then reset them back to standard when I'm not playing videos from youtube. The tool I used to adjust the Brightness level is the Intel control panel applet, below. However, it is difficult to bring up when I need it. And I only just discovered it today. I used to just sit up higher in my chair, which was terrible. If this is possible, how can I do this in Delphi? TIA

Hey there, It's Mert, newest guy at the forum. Saw that community is talking for important topics. I would like to ask a question to you all. First of all, I asked it first to @ertank , He answered me with significant words. I appreciate it. Me and my team jumped to C++Builder 11.2 about 1 month ago. We were using Embarcadero's previous versions but we want to add new features to our project with new developed components. Everybody know that DevExpress is also developing lovely components to VCL environment. My question is; if we take away DevExpress cost, is it most likely necessary to use and build our project with DevExpress components. What's about Embarcadero's own developed components vs DevExpress features? Is Embarcadero doing good job with their new components or are they not caring enough? On the other hand, what's about DevExpress VCL features? Waiting comments from you all. Thanks.

I asked this question over in Stack Overflow - and was given a helpful hint from Delphi Coder to ask here. Question: Looking for the distributor, sources, documentation, and/or licenses for SilentDD.exe ( an automation tool that supports logging from Delphi ) I'm trying to maintain some ancient code that uses unit SilentDD_TLB; and I am searching for where SilentDD.exe that was part of this package may have come from. I've run strings on the .exe and the only name that I've found was the author of a library that was used ( hello to Mike - author of the TThemeManager component for Borland Delphi ). I understand that SilentDD.exe was an automation server that supported logging, and the .exe was shipped with the product in the past, but I am very uncomfortable using an unknown .exe, never mind shipping said .exe to customers. The unit was generated from a type library file that is no longer around called SilentDD.tlb that long-gone (like mid-2004) developers had placed in their D:\Borland\Delphi5\ThirdParty folder It unit documents some interfaces IAutoSilentDD = interface(IDispatch) ['{8A241F3E-0403-4A97-9228-3527711C96A4}'] procedure LogMessage(const AKeyword: WideString; const AMessage: WideString); safecall; procedure LogFile(const AKeyword: WideString; const AFilename: WideString); safecall; function IsAppUsing(const AppKeyword: WideString): WordBool; safecall; end; and IAutoSilentDDDisp = dispinterface ['{8A241F3E-0403-4A97-9228-3527711C96A4}'] procedure LogMessage(const AKeyword: WideString; const AMessage: WideString); dispid 203; procedure LogFile(const AKeyword: WideString; const AFilename: WideString); dispid 204; function IsAppUsing(const AppKeyword: WideString): WordBool; dispid 207; end; This post is hidden. It was automatically deleted 1 year ago by CommunityBot. Closed. This question does not meet Stack Overflow guidelines. It is not currently accepting answers. We don’t allow questions seeking recommendations for books, tools, software libraries, and more. Edit the question so it can be answered with facts and citations. You can edit the question or post a new one. Closed 1 year ago. Edit question Question: Looking for the distributor, sources, documentation, and/or licenses for SilentDD.exe ( an automation tool that supports logging from Delphi ) I'm trying to maintain some ancient code that uses unit SilentDD_TLB; and I am searching for where SilentDD.exe that was part of this package may have come from. I've run strings on the .exe and the only name that I've found was the author of a library that was used ( hello to Mike - author of the TThemeManager component for Borland Delphi ). I understand that SilentDD.exe was an automation server that supported logging, and the .exe was shipped with the product in the past, but I am very uncomfortable using an unknown .exe, never mind shipping said .exe to customers. The unit was generated from a type library file that is no longer around called SilentDD.tlb that long-gone (like mid-2004) developers had placed in their D:\Borland\Delphi5\ThirdParty folder It unit documents some interfaces IAutoSilentDD = interface(IDispatch) ['{8A241F3E-0403-4A97-9228-3527711C96A4}'] procedure LogMessage(const AKeyword: WideString; const AMessage: WideString); safecall; procedure LogFile(const AKeyword: WideString; const AFilename: WideString); safecall; function IsAppUsing(const AppKeyword: WideString): WordBool; safecall; end; and IAutoSilentDDDisp = dispinterface ['{8A241F3E-0403-4A97-9228-3527711C96A4}'] procedure LogMessage(const AKeyword: WideString; const AMessage: WideString); dispid 203; procedure LogFile(const AKeyword: WideString; const AFilename: WideString); dispid 204; function IsAppUsing(const AppKeyword: WideString): WordBool; dispid 207; end; My only other clues are gained by extracting the .ridl file using tlibimp -I SilentDD.exe where tlibimp is Embarcadero TLIBIMP Version 12.16581

Hi. I am making Android app, and i add Android Service to project, guided by this video: Code in the Android Service: unction TDM.AndroidServiceStartCommand(const Sender: TObject; const Intent: JIntent; Flags, StartId: Integer): Integer; begin Result := TJService.JavaClass.START_STICKY; end; Calling from main project: FService : TLocalServiceConnection; FService := TLocalServiceConnection.Create; FService.StartService('F'); But when i lainch my application, it is crashing at once at start. When i launch my app under debugging, Delphi writing me: Full text on the attachment. Also, debugger get this code: I am using Delphi 10.4 CE.

SDL3 for Pascal If you want to get your hands dirty and directly use the new SDL3, I got you covered. 😎 Add SDL3 to your uses statement and it will be linked into your executable with direct access, no DLLs to maintain. You also get miniaudio (for audio), Nuklear (for GUI), pl_mpeg (for video) and stb (for images & fonts) and more. Added a contrib folder and accepting PRs, if you wish to add a contribution. To start the ball rolling, I added ziparc archive utility for making standard password protected zip archives, using zlib/minzip from SDL3pas only. Enjoy! https://github.com/tinyBigGAMES/SDL3

Hi All! I have a joystick that is connected to my phone. When my application is running a can see than joysticks buttons are pressing. But when the phone screen is locked, I don't see notifications about it in my app. What can I do to receive joystick button press in my application when the screen is locked? Receivers code procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; var KeyChar: Char; Shift: TShiftState); begin inc(i); Memo1.Lines.Add('i=' + IntToStr(i) + '; Key=' + IntToStr(Key)); end; The result of the application, photos of joysticks and the source code are in the attachment. KeyCodeReceiver.7z

Delphi 11, win7, office 2010, ms access I did not know anywhere else to post this and thought it best here. I use Office 2010, and when I open an Access database and proceed to open a text file for importing as a new Table or Linked source, it fails with the message "there is no object in this control" Also, when I proceed to open the Linked Table Manager, it also fails with the same message. After some time thinking about, and how it might have happened (I initially thought that Office got corrupt) I came to the conclusion that this happened when I installed Delphi 11.2 Alexandria because it uses the new Edge Browser components/dll's, etc., and that had to get installed which it installed, I think. Either way, I have to keep that installed in order to use Delphi 11 and/or some of the components. They appear to be necessary, so I'm stuck. It appears that I have lost some functionality in Access, like the above-mentioned, which I need and use regularly. Note, I use MS Access every day on this laptop. Does anyone know about this and how I can resolve that error message to get Access working correctly again ?

bonjours a tous je cherche le code source en delphi du projet :la gestion commercial du magasin et stock merci a l'avance mes amis

Hello, Many years ago, I have succesfully installed Rad Studio 10.2 (Tokyo) on Windows 10 Pro. Actually this is version 22H2. Since now I could build some projects with Delphi / VCL As it seems to not work correctly anymore, I have decided to deinstall all und install again. After installation and start of Rad Studio, I get a first screen with "Plattform choice" (wich tells that there are no more Plattform to Install). How can I get rid of this? I use only 32bit + VCL. In my previous installation, I did not get this. Then the IDE is started, but there are no components available. If I select the menu "Component", there is only "Import component", no "Add package" for example. Could someone give me some help? Thanks a lot. Regards Hubert

Win7, D11.2, FMX app, using TStringGrid and FireDAC and SQLite In a near-perfect working database, it should never happen, but it could happen elsewhere, and since I have the issue now, I would like to know how to resolve this. I was doing some what-if scenarios and came upon this issue. I searched around here and elsewhere on the internet but I can not find the answer. In this scenario, I was adding a new record, which has an auto-increment field in this test database, IDNo -- ('IDNo INTEGER NOT NULL PRIMARY KEY,'). And it generated an error. Of course I understand why this happened, and can later figure out a method to avoid it from happening. But for now, i need to know how to resolve the "closed dataset" issue because I can't see the data any longer. I've tried closing the Query, and reopening it. And tried closing the Connection and reopening it too. But they are not working. When a database or dataset closes, how do I re-open it through code so that I can see the data again in the StringGrid?