Leaderboard
Popular Content
Showing content with the highest reputation on 05/22/24 in all areas
-
Stack Overflow Developer Survey for 2024
Uwe Raabe replied to Dalija Prasnikar's topic in Tips / Blogs / Tutorials / Videos
I wonder if 42 would do, too... -
Stack Overflow Developer Survey for 2024
Lars Fosdal replied to Dalija Prasnikar's topic in Tips / Blogs / Tutorials / Videos
Or Androids... -
Stack Overflow Developer Survey for 2024
Dalija Prasnikar posted a topic in Tips / Blogs / Tutorials / Videos
Stack Overflow Developers Survey for 2024 is live https://stackoverflow.com/dev-survey/start Let's put Delphi on the map -
I'm not going to buy a certificate just so I can sign my open source programs. But if anybody else wants to create a signed installer, go ahead. GExperts is open source after all. Just make sure you comply with the license.
-
Wrong Formatting with Anonymous Thread in "Code Formatter""
luciano_f replied to luciano_f's topic in GExperts
https://sourceforge.net/p/gexperts/bugs/378/ -
Delphi on Surface Pro with Qualcomm CPU?
Jim McKeeth replied to PeterPanettone's topic in Windows API
The new Surface devices aren't shipping yet. I read there is a new emulation layer that is supposed to be faster, and frankly the last version was pretty good, so I'm optimistic. Will be nice to get an updated IDE and compiler though. -
Contrary to the Windows platform, the linker for Android/iOS/macOS needs the .so/.dylib, so it must be available when you compile (and link) your project. A quick and easy solution is to put the .so in the $(Platform)\$(Config) folder of your project. There are numerous elaborate explanations out there on why this is the case with the external linkers used for other platforms, but unfortunately I can't locate one right now. But you also need to deploy the .so - that's what Jims post is referring to.
-
What do you think of "Local Global variables"
Patrick PREMARTIN replied to Tommi Prami's topic in RTL and Delphi Object Pascal
Hi Just a question for me : why do you declare variables before the nested methods if this behavior disturbs you ? -
Product: Delphi Parser - AI claims - what does it mean?
#ifdef replied to Jasonjac2's topic in Delphi Third-Party
-
What do you think of "Local Global variables"
Stefan Glienke replied to Tommi Prami's topic in RTL and Delphi Object Pascal
I've seen this mentioned before yet I never found this to be true - at least not in recent (past decade) Delphi versions. -
Product: Delphi Parser - AI claims - what does it mean?
msohn replied to Jasonjac2's topic in Delphi Third-Party
Wow, I think my bullshit-meter just broke. Their marketing sounds like a non-technical managers dream. -
Product: Delphi Parser - AI claims - what does it mean?
Lajos Juhász replied to Jasonjac2's topic in Delphi Third-Party
The product About page gives you an explanation. According to that page it is an automatized robot that can analyze and rewrite your code. In my experience that is a very bold claim. -
Stack Overflow Developer Survey for 2024
Dalija Prasnikar replied to Dalija Prasnikar's topic in Tips / Blogs / Tutorials / Videos
The only correct answer is to write Oranges -
Stack Overflow Developer Survey for 2024
Lajos Juhász replied to Dalija Prasnikar's topic in Tips / Blogs / Tutorials / Videos
It's not a Captcha it is a test for AI. Only advanced AI can fill this questionary. -
Stack Overflow Developer Survey for 2024
Lars Fosdal replied to Dalija Prasnikar's topic in Tips / Blogs / Tutorials / Videos
It is a pretty lousy Captcha, I'd say. -
Stack Overflow Developer Survey for 2024
Lajos Juhász replied to Dalija Prasnikar's topic in Tips / Blogs / Tutorials / Videos
Same question for me. -
Stack Overflow Developer Survey for 2024
Gord P replied to Dalija Prasnikar's topic in Tips / Blogs / Tutorials / Videos
I got the same question. But I didn't think of your answer. That's funny. -
I use simply this, limited to common standard system strings, of course this is a skeleton ... form the Main program you can use it in this way: TTraduzione.ChangeValues('IT'); unit uTraduzione; interface uses WinApi.Windows, System.SysUtils, Vcl.Consts; Type TTraduzione = Class public class procedure SetResourceString(const xOldResourceString: PResStringRec; const xValueChanged: PChar); public class procedure ChangeValues(Lingua: string = ''); End; implementation class procedure TTraduzione.SetResourceString(const xOldResourceString: PResStringRec; const xValueChanged: PChar); var POldProtect: DWORD; PLostProtect: DWORD; begin VirtualProtect(xOldResourceString, SizeOf(xOldResourceString^), PAGE_READWRITE, @POldProtect); xOldResourceString^.Identifier := NativeUInt(xValueChanged); VirtualProtect(xOldResourceString, SizeOf(xOldResourceString^), POldProtect, @PLostProtect); end; class procedure TTraduzione.ChangeValues(Lingua: string = ''); begin if Lingua = 'IT' then begin //Carica la lingua italiana SetResourceString(@SMsgDlgYes, '&Si'); SetResourceString(@SMsgDlgWarning,'Attenzione'); SetResourceString(@SMsgDlgError, 'Errore'); SetResourceString(@SMsgDlgInformation, 'Informazione'); SetResourceString(@SMsgDlgConfirm , 'Conferma'); SetResourceString(@SMsgDlgNo , '&No'); SetResourceString(@SMsgDlgOK , 'OK'); SetResourceString(@SMsgDlgCancel , 'Annulla'); SetResourceString(@SMsgDlgHelp , '&Aiuto'); SetResourceString(@SMsgDlgHelpHelp , 'Aiuto'); SetResourceString(@SMsgDlgHelpNone , 'Nessun aiuto disponibile'); SetResourceString(@SMsgDlgAbort , '&Termina'); SetResourceString(@SMsgDlgRetry , '&Riprova'); SetResourceString(@SMsgDlgIgnore , '&Ignora'); SetResourceString(@SMsgDlgAll , '&Tutto'); SetResourceString(@SMsgDlgNoToAll , 'N&o a Tutto'); SetResourceString(@SMsgDlgYesToAll , 'Si a &Tutto'); SetResourceString(@SMsgDlgClose , '&Chiudi'); end else if Lingua = 'EN' then begin //Carica la lingua inglese SetResourceString(@SMsgDlgYes, '&Yes'); SetResourceString(@SMsgDlgWarning,'Warning'); SetResourceString(@SMsgDlgError, 'Error'); SetResourceString(@SMsgDlgInformation, 'Information'); SetResourceString(@SMsgDlgConfirm , 'Confirm'); SetResourceString(@SMsgDlgNo , '&No'); SetResourceString(@SMsgDlgOK , 'OK'); SetResourceString(@SMsgDlgCancel , 'Cancel'); SetResourceString(@SMsgDlgHelp , '&Help'); SetResourceString(@SMsgDlgHelpHelp , 'Help'); SetResourceString(@SMsgDlgHelpNone , 'No Help Available'); SetResourceString(@SMsgDlgAbort , '&Abort'); SetResourceString(@SMsgDlgRetry , '&Retry'); SetResourceString(@SMsgDlgIgnore , '&Ignore'); SetResourceString(@SMsgDlgAll , '&All'); SetResourceString(@SMsgDlgNoToAll , 'N&o to All'); SetResourceString(@SMsgDlgYesToAll , 'Yes to &All'); SetResourceString(@SMsgDlgClose , '&Close'); end else if Lingua = 'ES' then begin //Carica la lingua spagnola SetResourceString(@SMsgDlgYes, '&Si'); SetResourceString(@SMsgDlgWarning,'Advertencia'); SetResourceString(@SMsgDlgError, 'Error'); SetResourceString(@SMsgDlgInformation, 'Información'); SetResourceString(@SMsgDlgConfirm , 'Confirmar'); SetResourceString(@SMsgDlgNo , '&No'); SetResourceString(@SMsgDlgOK , 'OK'); SetResourceString(@SMsgDlgCancel , 'Cancelar'); SetResourceString(@SMsgDlgHelp , '&Ayuda'); SetResourceString(@SMsgDlgHelpHelp , 'Ayuda'); SetResourceString(@SMsgDlgHelpNone , 'No hay ayuda disponible'); SetResourceString(@SMsgDlgAbort , '&Termina'); SetResourceString(@SMsgDlgRetry , 'Intentar &otra vez'); SetResourceString(@SMsgDlgIgnore , '&Ignorar'); SetResourceString(@SMsgDlgAll , '&Todos'); SetResourceString(@SMsgDlgNoToAll , 'N&o a todo'); SetResourceString(@SMsgDlgYesToAll , 'S&i a todo'); SetResourceString(@SMsgDlgClose , '&Cerrar'); end else begin .................... .................... .................... end; end;