Autor Beitrag
ThEGZA
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 43



BeitragVerfasst: Di 17.09.02 15:46 
szItemText: array[0..255] of Char

wie lasse ich mir den inhalt von szItemText anzeigen ???

geht net mit edit1.text:= szItemText !!!

_________________
-= Ein Compiler tut nicht was man will ... sondern was man schreibt =-
Christian S.
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 20451
Erhaltene Danke: 2264

Win 10
C# (VS 2019)
BeitragVerfasst: Di 17.09.02 16:58 
Hi!

Einfach, aber sollte funktionieren:

ausblenden Quelltext
1:
2:
3:
4:
5:
6:
VAR i : INTEGER;
begin
  edit1.text:='';
  for i:=0 to High(szItemText) do
  edit1.text:=edit1.text+szItemText[i];
end;


MfG,
Peter

_________________
Zwei Worte werden Dir im Leben viele Türen öffnen - "ziehen" und "drücken".
LCS
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 1305
Erhaltene Danke: 1

WIN 7, WIN 8
Delphi XE5, Delphi XE, Delphi 2007
BeitragVerfasst: Di 17.09.02 18:42 
Nanu :?!?:
normalerweise sollte das zuweisungskompatibel sein. Bei mir funzt das einwandfrei.
Ansonsten geht auch
ausblenden Quelltext
1:
  edit1.Text := StrPas(szItemText);					

Merkwürdig, merkwürdig

Gruss Lothar

_________________
Der BH ist für die Brust, der Plan ist für'n Ar...
Christian S.
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 20451
Erhaltene Danke: 2264

Win 10
C# (VS 2019)
BeitragVerfasst: Di 17.09.02 19:22 
"StrPas". Die kannte ich auch noch nicht. Gut zu wissen!

_________________
Zwei Worte werden Dir im Leben viele Türen öffnen - "ziehen" und "drücken".
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Di 17.09.02 22:13 
Das ist auch zuweisungskompatible (<- schönes Wort fürs Galgenmännchen eigentlich :mrgreen:).
ThEGZA Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 43



BeitragVerfasst: Mi 25.09.02 09:01 
ich muss dringend wissen wie ich in delphi einen
ausblenden Quelltext
1:
buffer: array[0..1024] of Char;					

fülle.....

wie realisiere ich folgendes:
ausblenden Quelltext
1:
buffer:=edit1.text;					

ich weiß das es so net gehen kann aber wie denn :)

_________________
-= Ein Compiler tut nicht was man will ... sondern was man schreibt =-
LCS
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 1305
Erhaltene Danke: 1

WIN 7, WIN 8
Delphi XE5, Delphi XE, Delphi 2007
BeitragVerfasst: Mi 25.09.02 09:19 
Hi
zum Initialisieren
ausblenden Quelltext
1:
 FillChar(buffer, SizeOf(Buffer), #0);					

zum füllen aus Edit:
ausblenden Quelltext
1:
 StrPCopy(Buffer, Edit1.Text);					



Gruss Lothar

_________________
Der BH ist für die Brust, der Plan ist für'n Ar...
ThEGZA Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 43



BeitragVerfasst: Mi 25.09.02 09:25 
thx !!!
es hat sogar geklappt.....
nur ich brauch nochmal hilfe und zwar....wie schicke ich über
den sendmessage WM_SETTEXT befehl das ENTER Commando :?:

_________________
-= Ein Compiler tut nicht was man will ... sondern was man schreibt =-
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Mi 25.09.02 11:34 
Gar nicht.

Was willst du machen?
SMI
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 106

Win95-2003 / Debian / Suse
D1/D3/D6/D7
BeitragVerfasst: Mi 09.10.02 22:25 
Es leben die TypeCasts!

Leute mach ihrs kompliziert, beschäftigt euch mal mit Casts. Da lautet edit1.text Zuweisung folgendermaßen:

ausblenden Quelltext
1:
edit1.text := String(szItemText);					


Vorteile: Keine Funktionen :!: auch keine versteckten Funktions Aufrufe :!: Das spart enorm viel Zeit :!:

Und anders rum muss man nichtmal einen Cast setzten, denn ein Array of Char ist ein String! Da Delphi netterweise bei der Umwandlung vollautomatisch nullterminiert kann man es auch einfach machen.

szItemText := 'TEST';

An folgendem Beispiel kann man sehen wie's funktioniert

ausblenden Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
procedure TForm1.Button1Click(Sender: TObject);
VAR
 szItemText :  array[0..1024] of Char;
begin
 szItemText := 'TEST';

 showmessage(String(szItemText));
end;


Meinst du mit dem Enter einen Zeilenumbruch? Den kannst du mit den Ascii Codes #10 und #13 erzeugen.


SMI

_________________
Wenn es im Jahre 1879 schon Computer gegeben hätte, würden diese vorausgesagt haben, daß man infolge der Zunahme von Pferdewagen im Jahre 1979 im Pferdemist ersticken würde.
(John C. Edwards, brit. Zukunftsforscher)