Lajos Juhász
Members-
Content Count
1011 -
Joined
-
Last visited
-
Days Won
13
Everything posted by Lajos Juhász
-
Does it change if you change the CharCase from ecUpperCase to ecNormal?
-
https://blogs.embarcadero.com/eugene-kryukov-father-of-firemonkey-and-incredibly-talented-developer/?utm_source=facebook&utm_medium=social&utm_content=fatherOfFiremonkey
-
Reading the code I believe it is the: procedure TMyCustomCalendar.CreateWnd; begin inherited CreateWnd; RecreateWnd; // Force the control to redraw and send MCN_GETDAYSTATE end; Why do you want to create windows handle all the time? (just after it was created?)
-
variadic-arguments How to create a Delphi variadic method similar to Write/Writeln without requiring brackets for arguments?
Lajos Juhász replied to bravesofts's topic in Algorithms, Data Structures and Class Design
This has been done using compiler magic. You can not create such a function. -
Delphi 12.0 Athens is not correctly installing the Android SDK
Lajos Juhász replied to scamp's topic in Cross-platform
Since mobile platforms are changing so fast. It really depends at what moment you compare. At anytime the state of Delphi can be better or worse than last time. In 2100 when the mobile platforms are going to be stable like desktop you can expect a better integration with Delphi. -
Delphi 12.0 Athens is not correctly installing the Android SDK
Lajos Juhász replied to scamp's topic in Cross-platform
Since mobile platforms are changing so fast. It really depends at what moment you compare. At anytime the state of Delphi can be better or worse than last time. In 2100 when the mobile platforms are going to be stable like desktop you can expect a better integration with Delphi. -
Delphi 12.0 Athens is not correctly installing the Android SDK
Lajos Juhász replied to scamp's topic in Cross-platform
Since mobile platforms are changing so fast. It really depends at what moment you compare. At anytime the state of Delphi can be better or worse than last time. In 2100 when the mobile platforms are going to be stable like desktop you can expect a better integration with Delphi. -
How do I use a range-based for loop to sum all elements
Lajos Juhász replied to 357mag's topic in General Help
It was a couple a decade ago when I wrote my previous C code. At that moment x is out of scope You should use sum to hold the result: sum +=myArray[x] cout << "The sum is: " << sum << endl; -
I believe the 3rd character in the 10th line of your code is wrong. On a more serious note without any details what the server expects and how you tried to connect we can not help.
-
You wrote the best solution onChange. With this you might covered some situation. What for the case when instead of key down the user click on the row below or above?
-
You will have to debug the code. I've tested on a couple of reports it is working for me.
-
Mobile platforms are changing very fast. Sometimes it is difficult for Embarcadero to provde a solution in a reasonable time frame when the new requirements are released to be able to continue to compile for new versions. Unfortunately nowdays Delphi support too many platforms. They are playing catch up games against other products. Delphi is by rule almost always way behind.
-
It is in lines property,
-
(In theory) you can use the TXMLDocument if you select a cross platform DOM vendor. (https://docwiki.embarcadero.com/RADStudio/Alexandria/en/Using_the_Document_Object_Model)
-
At the second row is not the end of the dataset, eof is going to be true when you call next on the last row. You can check recno or a value of the group field.
-
procedure TForm1.FormCreate(Sender: TObject); begin Var Boy: string; Girl: string; Couple: string; end; For those who doesn't have a modern compiler. Of course inline var is not a block thus it will produce errors: [dcc32 Error] Unit1.pas(29): E2003 Undeclared identifier: 'Girl' [dcc32 Error] Unit1.pas(29): E2029 '(' expected but ';' found [dcc32 Error] Unit1.pas(30): E2003 Undeclared identifier: 'Couple' [dcc32 Fatal Error] Project1.dpr(5): F2063 Could not compile used unit 'Unit1.pas' Failed
-
You have to select a checkbox during the install process (Technology - Teechart standard). Unfortunately Embarcadero has licenced the product without the source code. I did not noticed problems with the Teechart.
-
Resizing Object Inspector Pane in 12.2p2
Lajos Juhász replied to Attila Kovacs's topic in Delphi IDE and APIs
I can shrink it like this: -
Set the transparent property to false: var num: TStaticText; begin num:=TStaticText.create(self); num.parent:=self; // rect:=wc.boundsrect; // num.caption:=' '+inttostr(lastnumnum)+' '; num.caption:=' Test'; num.font.name:='Arial'; num.font.color:=clred; num.Transparent:=false; end; Edit. You have to use StyleElement only if your application is using VCL Styles.
-
This was written by Copilot. I can not test the code as I do not have the iOS units installed on my system. To change the screen brightness on iOS using Delphi, you can use the UIScreen class from the iOS API. Here's a basic example of how you can achieve this: 1. Import the necessary iOS units: uses iOSapi.UIKit, iOSapi.Foundation; 1. Set the screen brightness: procedure SetScreenBrightness(Brightness: CGFloat); begin UIScreen.mainScreen.setBrightness(Brightness); end; 1. Call the procedure with the desired brightness level: begin SetScreenBrightness(0.5); // Set brightness to 50% end; In this example, UIScreen.mainScreen.setBrightness is used to set the brightness level. The brightness value should be between 0.0 (minimum brightness) and 1.0 (maximum brightness)https://www.reddit.com/r/iOSProgramming/comments/whtu5q/is_there_a_way_to_control_screen_brightness/https://forums.developer.apple.com/forums/thread/717234. Would you like more details on integrating this into a full application?
-
How to refer to a single value from an enumerated type declared in a set type?
Lajos Juhász replied to PiedSoftware's topic in RTL and Delphi Object Pascal
OP is on older version of Delphi 10.4 your example is Delphi 12.- 7 replies
-
- pascal
- enumerate type
-
(and 1 more)
Tagged with:
-
How to get the version of Delphi that the App is built with?
Lajos Juhász replied to Ian Branch's topic in General Help
Embarcadero could have that: https://docwiki.embarcadero.com/Libraries/Athens/en/System RTLVersion RTLVersion: Comp = 36; RTLVersion121 RTLVersion121: Boolean = True; RTLVersion122 RTLVersion122: Boolean = True; RTLVersion123 RTLVersion123: Boolean = True; -
Cannot pass a procedure to another
Lajos Juhász replied to dormky's topic in RTL and Delphi Object Pascal
program Project1; {$APPTYPE CONSOLE} {$R *.res} uses System.Classes, Winapi.Windows; type TMyRecord = class data: Integer; class procedure Queue(const AThread: TThread; AMethod: TThreadProcedure); end; class procedure TMyRecord.Queue(const AThread: TThread; AMethod: TThreadProcedure); begin OutputDebugString(PChar('In TMyRecord.Queue')) end; begin TThread.Queue(nil, procedure begin OutputDebugString(PChar('Hello !')) end); TMyRecord.Queue(nil, procedure begin OutputDebugString(PChar('Hello !')) end); end. It should be TThreadProcedure not method. -
FireDAC is very strict. When I have moved projects from BDE and DBX that involved a lot of changes.
-
Double, default value
Lajos Juhász replied to Skrim's topic in Algorithms, Data Structures and Class Design
As a result it can not be assigned to an event.