Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi aus editbox auslesen- Problem (https://www.delphipraxis.net/128218-aus-editbox-auslesen-problem.html)

AlexanderBrade 26. Jan 2009 13:30


aus editbox auslesen- Problem
 
Hallo, ich habe eine editbox und beachsichtige aus ihr den Text als string auslesen, ich möchte allerdnings nur die ersten drei Stellen der Zeichenfolge auslesen und diese 3 Zeichen auch noch in Großbuchstaben umwandeln!
Langsam verzweifle ich, vielen Dank im voraus!

quendolineDD 26. Jan 2009 13:33

Re: aus editbox auslesen- Problem
 
Mit ein bisschen Suche im Forum wärst du auch auf den Quelltext gestossen. Aber hier sind deine 2 Zeilen.
Delphi-Quellcode:
var s : String;
begin
  s := Copy(Edit1.Text, 0, 3);
  s := UpperCase(s);
end;
Lg

DeddyH 26. Jan 2009 13:34

Re: aus editbox auslesen- Problem
 
Meinst Du sowas?
Delphi-Quellcode:
ShowMessage(AnsiUpperCase(Copy(Edit.Text,1,3)));

nahpets 26. Jan 2009 13:34

Re: aus editbox auslesen- Problem
 
Delphi-Quellcode:
meinedreizeichen := AnsiUpperCase(Copy(edit.text,1,3));

Klaus01 26. Jan 2009 13:41

Re: aus editbox auslesen- Problem
 
einen habe ich auch noch:

Delphi-Quellcode:
  edit2.Text := UpperCase(format('%.3s',[edit1.text]));
Grüße
Klaus


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:15 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz