Lazarus
Home
Help
TinyPortal
Search
Login
Register
Lazarus
»
Forum
»
Programming
»
LCL
»
[Solved] Uppercase character control
Free Pascal
Website
Downloads
Wiki
Documentation
Bugtracker
Mailing List
Lazarus
Website
Downloads (Laz+FPC)
Packages (OPM)
FAQ
Wiki
Documentation (RTL/FCL/LCL)
Bugtracker
CCR Bugs
GIT
Mailing List
Other languages
Foundation
Website
Useful Wiki Links
Project Roadmap
Getting the Source
Screenshots
How to use the forum
About donations (wiki)
Bookstore
Computer Math and Games in Pascal
(preview)
Lazarus Handbook
Search
Advanced search
WIKI Timeout issues
Please read here if you have trouble connecting to the wiki
Recent
CEF component - the first...
by
Nicole
[
Today
at 05:18:10 pm]
Layout problem by nested ...
by
Nicole
[
Today
at 05:12:36 pm]
Lazarus 4, What's wrong w...
by
Thaddy
[
Today
at 05:11:07 pm]
Loading an image from an ...
by
Thaddy
[
Today
at 04:42:00 pm]
Build failure
by
wp
[
Today
at 04:36:02 pm]
IDE Lazarus 4.0 on Window...
by
Martin_fr
[
Today
at 03:47:30 pm]
Lazarus 4.0 RC3
by
paxnet_be
[
Today
at 02:34:23 pm]
Firebird 5 remote login v...
by
LacaK
[
Today
at 02:07:34 pm]
Compile errors in MacBook...
by
Thaddy
[
Today
at 11:46:06 am]
LAMW - UTF-8 character in...
by
Alcatiz
[
Today
at 11:36:29 am]
How to run an external pr...
by
vsajip
[
Today
at 08:50:34 am]
lazbuild command line swi...
by
n7800
[
Today
at 04:21:35 am]
dBGRidController and Erro...
by
essence-ciel
[
Today
at 01:15:11 am]
"LCLVersion" in *.lfm fil...
by
zeljko
[June 17, 2025, 11:05:36 pm]
FPC for high-performance ...
by
Thaddy
[June 17, 2025, 09:42:33 pm]
How to stop macro executi...
by
440bx
[June 17, 2025, 09:19:45 pm]
x86_64-win64 annoys me
by
Nicole
[June 17, 2025, 08:28:16 pm]
OpenDialog and mouse even...
by
Martin_fr
[June 17, 2025, 07:37:19 pm]
InstallAware 2025 Sources...
by
msintle
[June 17, 2025, 06:49:04 pm]
Sqlite & Zeos
by
CharlyTango
[June 17, 2025, 05:01:43 pm]
Strict Aliasing Rule
by
nixbody
[June 17, 2025, 04:19:41 pm]
Lazarus 4 - I give up and...
by
Nicole
[June 17, 2025, 04:01:40 pm]
LazUtils, FileUtil.CopyDi...
by
AlexTP
[June 17, 2025, 02:52:02 pm]
Help needed setting up LA...
by
silvercoder70
[June 17, 2025, 12:12:06 pm]
Font character being clip...
by
Coxy
[June 17, 2025, 12:04:54 pm]
« previous
next »
Print
Pages: [
1
]
Author
Topic: [Solved] Uppercase character control (Read 788 times)
loaded
Hero Member
Posts: 865
[Solved] Uppercase character control
«
on:
March 02, 2022, 07:38:16 am »
Hi All
Is there a ready-made method to check that the string is all unicode capital letters?
Or should we create it ourselves?
«
Last Edit: March 02, 2022, 08:48:01 am by loaded
»
Logged
Check out
loaded
on Strava
https://www.strava.com/athletes/109391137
Zvoni
Hero Member
Posts: 2981
Re: Uppercase character control
«
Reply #1 on:
March 02, 2022, 08:21:09 am »
https://lazarus-ccr.sourceforge.io/docs/lazutils/lazutf8/utf8uppercase.html
Code: Pascal
[Select]
[+]
[-]
Uses
LazUTF8
;
Var
s
:
String
;
Begin
s
:
=
'SOME UNICODE STRING WITH ÄÄÖÖÜÜ'
;
If
s
=
UTF8UpperCase
(
s
,
'de'
)
Then
Writeln
(
'Yes'
)
;
End
;
«
Last Edit: March 02, 2022, 08:59:08 am by Zvoni
»
Logged
One System to rule them all, One Code to find them,
One IDE to bring them all, and to the Framework bind them,
in the Land of Redmond, where the Windows lie
---------------------------------------------------------------------
Code is like a joke: If you have to explain it, it's bad
loaded
Hero Member
Posts: 865
Re: Uppercase character control
«
Reply #2 on:
March 02, 2022, 08:47:46 am »
This is a very nice solution;
You saved me a lot of trouble, thank you very much Zvoni
Logged
Check out
loaded
on Strava
https://www.strava.com/athletes/109391137
Print
Pages: [
1
]
« previous
next »
Lazarus
»
Forum
»
Programming
»
LCL
»
[Solved] Uppercase character control
TinyPortal
© 2005-2018