Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: AddressToIP TJvIpAdress

    Delphi
    by CReber, 14. Nov 2004
  Der Vollständigkeit halber poste ich mal wie ich es jetzt gemacht habe ... Vlt. kann man das ja mal gebrauchen!
  
  var Class1,Class2,Class3,Class4 : Byte;
  Class5,Class6,Class7,Class8 : Byte;
  a,b,d,d : Byte;
  begin
  
  if eIPEnd.Address > eIPStart.Address then begin
  with eIPStart.AddressValues do begin
  Class1:=Value1;
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  AddressToIP TJvIpAdress

    Delphi
    by CReber, 14. Nov 2004
  Ich verwende die Komponente TJvIpAdress. Nun möchte ich eine Schleife von der benutzerdefinierte Start IP und End IP machen.
  
  if eIPEnd.Address > eIPStart.Address then
  for j := eIPStart.Address to eIPEnd.Address do begin
  
  Diese Adress ist wie folgt aufgebaut:
  
  // Address ist ein Cardinal Wert
  
  procedure TJvIpAddressValues.SetValue(const AValue: Cardinal);