CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede juzas Mester
08. april 2022 - 20:39 Der er 5 kommentarer og
1 løsning

Delphi Udplug en string fra edit text

Hej.
Mangler lidt hjælp til at udtage tallet mellem ( ).

Har denne tekst i en edit1: "210 (32)"
Har denne tekst i en edit2: "32 (3233)"

Vil gerne have tallet mellem ( ) fra edit1 i en edit3.
Vil gerne have tallet mellem ( ) fra edit2 i en edit4.

Tallet mellem ( ) svinger så det kan være alt fra 0 - 1000.
Avatar billede arne_v Ekspert
08. april 2022 - 20:45 #1
Lyder som en sag for regex!
Avatar billede arne_v Ekspert
09. april 2022 - 02:57 #2
Det her virker i Lazarus/FPC:


program regexfun;

uses
  RegExpr;

var
  re : TRegExpr;

begin
  re := TRegExpr.Create('\d+\s*\(\s*(\d+)\s*\)');
  re.Exec('123 ( 456 )');
  writeln(re.Match[1]);
end.
Avatar billede arne_v Ekspert
09. april 2022 - 03:00 #3
Jeg vil tro at det samme i Delphi skal laves som (utestet!):


program regexfun;

uses
  RegEx;

var
  re : TRegEx;
  m : TMatch;

begin
  re := TRegEx.Create('\d+\s*\(\s*(\d+)\s*\)');
  m := re.Match('123 ( 456 )');
  writeln(m.Groups.Item[1].Value);
end.


Men proev dig lidt frem.
Avatar billede juzas Mester
09. april 2022 - 17:02 #4
Har prøvet en del nu. Jeg få denne fejl ved din kode "I/O error105)

Fortæller koden også at tallet mellem ( ) skal vises i en anden edit.
Avatar billede arne_v Ekspert
09. april 2022 - 20:48 #5
Koden udtrækker kun det tal der står mellem parenteserne som en string.

Men det er nemt at assigne til en kontrol så.
Avatar billede arne_v Ekspert
09. april 2022 - 20:48 #6
Hvordan ser din Delphi kode ud nu og hvilken linie giver den fejl?
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra Andet programmering kategorien

Titel Indlæg Oprettet Seneste aktivitet
ASP Classic fil fra subfolder Af bsn i Andet programmering 3 07/05/202416:14 08/05/202401:00
Session Variable Af bsn i Andet programmering 3 01/05/202409:44 02/05/202409:29
Modifyed Field for all Records in Access Af ingeman i Andet programmering 2 29/04/202416:05 30/04/202407:19
Delphi - Parser JSON Fil Af juzas i Andet programmering 4 25/02/202407:13 28/02/202420:56
Bat fil Af sjass i Andet programmering 5 15/01/202417:45 15/01/202420:35
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 00:00 4 G kontra 5 G Af fjorbak i Routere & Switches
I går 22:23 Opdater et ark Af lurup i Excel
I går 19:13 Lyac taletidskort Af fjorbak i Mobiltelefoner
I går 17:51 Assistance til at bygge min PC Af SilentSloth i PC
I går 17:28 E-sim (kort) Af fjorbak i Routere & Switches
White papers
Flere white papers »


Premium
Teaser billede
Devoteam Danmark lander sit første underskud i 21 år: Moderselskab tvinges til at give økonomisk støtte
Læs mere »
Microsoft kaster milliardbeløb efter nye tiltag til partnerprogrammet: Partnerne kan nu tjene endnu flere penge
Dell Danmark får halveret sit overskud og omsætningen styrtdykker: Har fyret medarbejdere
Så mange Microsoft-enheder blev ramt af gigantisk Crowdstrike-koks
Se alle »
Computerworld
Teaser billede
Microsoft-nedbrud spreder sig: It-systemer i lufthavne verden over er ramt
Læs mere »
Test: Denne mikro-pc er smartere end de stærkeste desktop-maskiner - men flopper alligevel
Hundredevis af flyafgange ramt af stort Microsoft-nedbrud
Lukker og slukker: Microsoft sender platform på pension
Se alle »
CIO
Teaser billede
Microsoft er på sagen: I gang med at løse kæmpe nedbrud efter katastrofal Crowdstrike-fejl
Læs mere »
Så mange Microsoft-enheder blev ramt af gigantisk Crowdstrike-koks
Peter Lüth udlever CTO-drømmen: Bygger et system fra bunden og tjener kassen på det
Sådan forbereder energiselskabet OK sig på cyberangreb: "Prisen for ikke at gøre noget kan være forfærdeligt høj"
Se alle »
Job & Karriere
Teaser billede
Bo solgte sit software-system for et treciftret millionbeløb: Brugte pengene på at købe 80 medarbejdere til ny storsatsning
Læs mere »
Efter 12 år er NNIT's hovedkvarter i Søborg nu ryddet og tomt - alle arbejder hjemme: "Det er med et vist vemod"
Norlys skal splittes op i fem selskaber: Nu bliver flere ansatte og ledere fyret
Dansk top-profil trækker sig fra Microsoft: Skal være direktør i TDC Erhverv
Se alle »
White paper
Teaser billede
Sådan: Sikker, hurtig og fleksibel storage til dine kritiske data
Læs mere »
MDR: Transparent sikkerhed og overvågning i realtid
Optimering af Source-to-Pay: Identificér oplagte gevinster og skær omkostninger
Vejen væk fra WAN: Sådan skifter du til en moderne infrastruktur
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »