Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi IP-Eingabefeld: Während des Designs sichtbar (https://www.delphipraxis.net/39691-ip-eingabefeld-waehrend-des-designs-sichtbar.html)

Helmi 6. Feb 2005 15:34


IP-Eingabefeld: Während des Designs sichtbar
 
Hallo,

ich hab mir Luckies Beispiel über das IP-Eingabefeld angeschaut und würd das gerne in mein Projekt mit übernehmen.

Folgendes hab ich mal als Test programmiert:

Code:
procedure TForm1.Button1Click(Sender: TObject);
var
   hIpAddr: Integer;
  wnd: THandle;

begin
  wnd := Form1.Handle;

   // IP-Adresse
  hIpAddr := CreateWindowEx(WS_EX_CLIENTEDGE, WC_IPADDRESS, nil,
                    WS_VISIBLE or WS_CHILD,10,20,120,21,wnd,IDC_IPCTRL, hInstance, nil);

  If(hIpAddr <> 0) then
     SendMessage(hIpAddr, IPM_SETADDRESS, 0, MAKEIPADDRESS(127,0,0,1));
end;
Das klappt auch wunderbar und schaut mit dem XP-Manifest auch sehr gut aus. :thumb:

Was mich ein wenig daran stört ist, dass das Eingabefeld nur zur Laufzeit sichtbar wird aber nicht im Design-Modus.
(ja ja - ich weiss: oben steht Button1 - das ist nur als Test da; normalerweise würd ich diesen Code oben in das OnCreate des Fensters packen :warn:)

Und dann noch ne kurze Frage, die dazu passt: Wie komm ich an die eingegebene IP-Adresse ran?

s.h.a.r.k 6. Feb 2005 16:28

Re: IP-Eingabefeld: Während des Designs sichtbar
 
Tach!

Ich hätte da eine andere Variante für dich: Schau dir mal die JEDI-Komponente-Package an. Dort gibt es ein Edit, speziell für die IP-Adresse. Diese ist auch schon im Desgin-Modus verfügbar und veränderbar! Hab zwar damit noch nie was gemacht ist aber recht gut gemacht!

JEDI-Komponenten: Link

mfg shark

MathiasSimmack 6. Feb 2005 17:08

Re: IP-Eingabefeld: Während des Designs sichtbar
 
Zitat:

Zitat von Helmi
Und dann noch ne kurze Frage, die dazu passt: Wie komm ich an die eingegebene IP-Adresse ran?

Steht das nicht im IP-Eingabefeld-Tutorial der Win32-API-Tutorials? :gruebel: Ich sollte es eigentlich wissen ... :stupid:


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:34 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