IdTime / IdDateTime - Indy - Uhrzeit aus Internet abfragen

MephistoFFF · Beiträge: 60 Win 7

Hallo! Ich brauche für eine Kindersicherung die aktuelle Uhrzeit aus dem Internet. Ich habe mich da schon kundig gemacht und die Stichwort "Indy" und "IdDateTime" gefunden. Indy habe ich auch heruntergeladen, weiß allerdings nicht, wie ich es mit meinem Delphi verwenden soll. Ich denke, der Code ist soweit richtig, allerdings wird "IdTime" als nichtdeklarierter Bezeichner bemängelt, was sicherlich damit zusammenhängt, dass ich nicht weiß wie ich Indy mit meinem Delphi verwenden soll.

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

begin
  try
    IdTime1.Host := 'ptbtime1.ptb.de';
    LabelTime.Caption := TimeToStr(IdTime1.DateTime);
  finally
    IdTime1.Disconnect;
  end;

Bin für jede Hilfe dankbar.

mfG

Hobby-Programmierer · Verfasst: So 29.03.09 16:05

... hast Du die IdTime Komponente vom Indy-Clients Register auf das Formular gezogen?

MephistoFFF · Beiträge: 60 Win 7

Hobby-Programmierer hat folgendes geschrieben :

... hast Du die IdTime Komponente vom Indy-Clients Register auf das Formular gezogen?

Wie gesagt, ich weiß nicht wie ich das ganze verwenden soll... das Indy-paket besteht ja aus viele *.pas-Dateien... keine ahnung wohin ich die entpacken soll...?!

mfG

JayEff · Beiträge: 2971 Windows Vista Ultimate D7 Enterprise

Es gibt meines wissens ein Installationsprogramm, auf welches man doppelklicken kann um die Indys zu installieren. Falls du sowas nicht hast, musst du das Package öffnen, das ist eine .dpk datei. Diese musst du nur Kompilieren und Installieren (Es müsste sich ein kleines Fenster öffnen in dem es die entsprechenden Buttons gibt), aber zunächst solltest du das Source-Verzeichnis entweder in der IDE dem Suchpfad hinzufügen (unter D7 z.B. Tools->Umgebungsoptionen->Bibliothek) oder die .pas Dateien in den DelphiX\Lib Pfad kopieren. Dann müsste alles funktionieren;
Aber ist lang her, dass ich die installiert hab :nixweiss:

_________________
>+++[>+++[>++++++++<-]<-]<++++[>++++[>>>+++++++<<<-]<-]<<++
[>++[>++[>>++++<<-]<-]<-]>>>>>++++++++++++++++++.+++++++.>++.-.<<.>>--.<+++++..<+.

Hobby-Programmierer · Verfasst: So 29.03.09 16:25

Sind die Indy Komponenten nicht Bestandteil der Turbodelphi Version? Nachinstallieren von Kompos wird nicht funktionieren.

[edit]
Habe gerade nochmal nachgelesen, das die Indys bereits in die Turbo Versionen integriert sind.
Schau einfach mal in der Komponentenpalette nach Indy-Clients ...

JayEff · Beiträge: 2971 Windows Vista Ultimate D7 Enterprise

Hobby-Programmierer hat folgendes geschrieben :

Nachinstallieren von Kompos wird nicht funktionieren.

Doch schon, es sei denn, er hat die kostenlose Variante :mrgreen:

Davon müssen wir vermutlich ausgehen - also heißt es, wie eben gesagt:
das Source-Verzeichnis entweder in der IDE dem Suchpfad hinzufügen (unter D7 z.B. Tools->Umgebungsoptionen->Bibliothek) oder die .pas Dateien in den DelphiX\Lib Pfad kopieren. Dann musst du rausfinden, welche Units du einbinden musst und per

markieren

Delphi-Quelltext

1:
2:
3:

  var idDateTime1: TidDateTime;
begin
  idDateTime1 := TidDateTime.Create(self{?});

das Objekt selbst erstellen. Oder so ähnlich.
Oder der erste Satz von Hobby-Programmierer ist richtig (was ich nicht weiß, da ich kein Turbo Delphi hab) und die Sache ist geschenkt :zustimm:

_________________
>+++[>+++[>++++++++<-]<-]<++++[>++++[>>>+++++++<<<-]<-]<<++
[>++[>++[>>++++<<-]<-]<-]>>>>>++++++++++++++++++.+++++++.>++.-.<<.>>--.<+++++..<+.

MephistoFFF · Beiträge: 60 Win 7

Ich habe in der Tool-palette keine indy-clients. Das package is zwar dabei bei meinem delphi, lässt sich allerdings nicht installieren ( Komponenten ==> Packages installieren ==> das Indy-zeugs... wenn ich dort auf installieren gehe, sagt er mir, dass das nachinstallieren von komponenten nicht lizensiert ist ) ...

@JayEff: ich aheb sämtliche datein aus der zip in den besagten ordner kopiert und den code von dir versucht, funktioniert allerdings nicht... immernoch "nichtdeklarierter bezeichner"

mfG

JayEff · Beiträge: 2971 Windows Vista Ultimate D7 Enterprise

MephistoFFF hat folgendes geschrieben :

@JayEff: ich aheb sämtliche datein aus der zip in den besagten ordner kopiert und den code von dir versucht, funktioniert allerdings nicht... immernoch "nichtdeklarierter bezeichner"

Codeausschnitt?
Dashier hast du benutzt? :gruebel:

JayEff hat folgendes geschrieben :

markieren

Delphi-Quelltext

1:
2:
3:
4:

var 
  idDateTime1: TidDateTime;
begin
  idDateTime1 := TidDateTime.Create(self{?});

_________________
>+++[>+++[>++++++++<-]<-]<++++[>++++[>>>+++++++<<<-]<-]<<++
[>++[>++[>>++++<<-]<-]<-]>>>>>++++++++++++++++++.+++++++.>++.-.<<.>>--.<+++++..<+.

MephistoFFF · Beiträge: 60 Win 7

JayEff hat folgendes geschrieben :

MephistoFFF hat folgendes geschrieben :

@JayEff: ich aheb sämtliche datein aus der zip in den besagten ordner kopiert und den code von dir versucht, funktioniert allerdings nicht... immernoch "nichtdeklarierter bezeichner"

Codeausschnitt?
Dashier hast du benutzt? :gruebel:

JayEff hat folgendes geschrieben :

markieren

Delphi-Quelltext

1:
2:
3:
4:

var 
  idDateTime1: TidDateTime;
begin
  idDateTime1 := TidDateTime.Create(self{?});

Ja^^ so habe ich es genutzt...

JayEff · Beiträge: 2971 Windows Vista Ultimate D7 Enterprise

und welche Zeile markiert er mit "nicht deklarierter Bezeichner"?

JayEff hat folgendes geschrieben :

Dann musst du rausfinden, welche Units du einbinden musst

Dashier ebenfalls gemacht?

_________________
>+++[>+++[>++++++++<-]<-]<++++[>++++[>>>+++++++<<<-]<-]<<++
[>++[>++[>>++++<<-]<-]<-]>>>>>++++++++++++++++++.+++++++.>++.-.<<.>>--.<+++++..<+.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme