Forum: Netzwerke
Delphi
by josef,
1. Aug 2003
Komishc.
Jetzt pingt er immer 127.0.0.0 wenn ich 127.0.0.1 bis 127.0.0.2 eingebe???
if (CheckBox1.Checked = true) then
begin
startip:=ipstart1.text+'.'+ipstart2.text+'.'+ipstart3.text+'.'+ipstart4.text;
endip:=ipend1.text+'.'+ipend2.text+'.'+ipend3.Text+'.'+ipend4.text;
Dstartip:=ntohl(inet_addr(PAnsiChar(startip)));
Dendip:=ntohl(inet_addr(PAnsiChar(endip)));
ShowMessage('start:...
Forum: Netzwerke
Delphi
by josef,
31. Jul 2003
Danke an alle.
Jetzt hab ich nur noch ein Problem!
Wie konvertier ich einen Integer nach in_addr????
Forum: Netzwerke
Delphi
by josef,
31. Jul 2003
Noch eine Frage.
Ich nehm jetzt diesen Codeif (ipstart1.Text > '255') then
begin
mystring := ipstart1.Text;
Delete(mystring,3,1);
ipstart1.text := mystring;
end
Wenn ich nun einen wert größer 255 eingebe wird das Letzte zeichen gelöscht!
Allerdings ist der Cursor dann auf dem ERSTEN Zeichen.
Wie setze ich den auf das dritte?