![]() |
nonVCL-Edit erstellen
Hi,
ich weiß, eigentlich ne doofe Frage, aber ich kriegs einfach nicht auf die Reihe. CreateWindow bringt keinen Fehler, mit ShowWindow kann ichs auch nicht anzeigen.
Delphi-Quellcode:
Was mache ich falsch?
MyEdit2 := CreateWindow('EDIT', 'Edit2', ES_PASSWORD, 128, 408, 121, 21, Form1.Handle, 0, HINSTANCE, nil);
SendMessage(MyEdit2, WM_SHOWWINDOW, 1, 0); greetz Snuffi |
Re: nonVCL-Edit erstellen
Delphi-Quellcode:
var
MyEdit2: HWND; begin MyEdit2 := CreateWindow('EDIT', 'Edit2', ES_PASSWORD or WS_CHILD { damits auf formular bleibt }, 128, 408, 121, 21, Form1.Handle, 0, HINSTANCE, nil); ShowWindow(MyEdit2, SW_SHOW); |
Re: nonVCL-Edit erstellen
hmm, das mit dem WS_CHILD hab ich wohl vergessen :oops:
Und ShowWindow wollt ich auch verwenden, obwohls ja eigentlich das gleiche bewirkt, oder? --- Habs grad ausprobiert, das sieht irgendwie komisch aus: Der Rahmen fehlt und rechts und unten sind schwarze Ränder. Wenn ichs ohne Manifest mach, sind die Ränder weg aber der Rahmen auch :( Auf Anhieb krieg ich das auch nicht hin... :( |
Re: nonVCL-Edit erstellen
Dazu brauchst du einen Extended Window Style
Delphi-Quellcode:
CreateWindowEx(WS_EX_CLIENTEDGE, 'EDIT', 'Edit2', WS_VISIBLE or WS_CHILD or ES_PASSWORD, 128, 408, 121, 21, Form1.Handle, 0, HINSTANCE, nil);
|
Re: nonVCL-Edit erstellen
Ich habs befürchtet... :mrgreen:
WS_Visible hab ich auch schon rausgefunden :) --- Funktioniert auch nicht so recht, jetzt sind oben, links und rechts schwarze Streifen (ohne Manifest gehts... aber ich will ja keine Sternchen sondern Punkte) :? |
Re: nonVCL-Edit erstellen
erstell ein normales TEdit und pass es so an:
Delphi-Quellcode:
Edit1.Font.Name := 'Wingdings';
Edit1.PasswordChar := #108; |
Re: nonVCL-Edit erstellen
Genau das will ich nicht :mrgreen:
Das sieht zum einen nicht ganz richtig aus und macht auch auf anderen Systemen Punkte... Dazu hab ich schon massenhaft Threads gewälzt :) |
Re: nonVCL-Edit erstellen
Die VCL macht auch nicht viel anders und wenn du nur Sterne willst stellst du das halt bei PasswordChar ein.
Zur Not kann man das Feld ja auch dyn. erstellen damit es nicht in der Resource auftaucht. Wenn ich BMW fahre stell ich mir ja auch nicht die Sitze vom Trabbi rein. :mrgreen: |
Re: nonVCL-Edit erstellen
Ich glaub du hast mein Problem nicht richtig verstanden oder?
Zitat:
Das einzige Problem ist noch, dass das Edit halt komisch aussieht, weils keinen Rahmen kriegt. (das mit dem BMW versteh ich jetzt nicht ganz, aber falls du meinst VCL = BMW und nonVCL = Trabant dann muss ich dir sagen VCL = Trabi!! Das VCL-Edit spricht nämlich kein Unicode und das muss es für die Punkte :D) |
Re: nonVCL-Edit erstellen
Das Problem ist wie du siehst, dass die nonVCL-Fenster nicht richtig von der VCL untersützt werden (können), betreffend dem Manifest.
Wie auch, zie Zeichenroutienen von Windows-API und der VCL unterscheiden sich. |
Alle Zeitangaben in WEZ +1. Es ist jetzt 07:13 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz