Adressbuch ??

[inzzi]

Ich habe jetzt ein kleines tool programmiert mir dem man sms versenden kann (ganz legal, und mit der erlaubnis des providers) das senden usw. funktioniert alles.
Jetzt möchte ich eine Art "Adressbuch" und einen "SMS-Archiv" einrichte, in dem man sms-sprüche oder ähnliches speichern kann.

Nur habe ich noch keinerlei erfahrung mit dem Speichern von Datein oder Texten.

Das ganze programm basiert auf einer Website, also mit der TWebbrowser Komponente. Das Formular auslesen ist auch kein Problem, nur halt das Speichern selbst...

vielleicht kann mir ja einer helfen.. thx inzzi

[Hansa]

Hi,

da bin ich auch dran:

http://www.delphipraxis.net/viewtopi...&highlight=sms

wie schickst Du denn die SMS weg ? Lies Dir das da mal durch.

Gruß
Hansa

[inzzi]

ja den thread hab i schon gelesen.

Aber ich hab eine kleine vereinbarung mit dem Provider (privater provider) und ich stell ihm das programm zur verfügung um es auf seiner page zum download anzubieten. Im gegenzug erhalte ich die erlaubnis das programm weiter zu verwenden.

Das ganze ist eigentlich ganz einfach:
Ich lade nur die sms.php in mein TWebBrowser und der user kann dann das formular ganz einfach ausfüllen und dann abschicken.

Jetzt möchte ich aber den Text aus dem Formular auslesen und in einer datei speichern, um die sms später wieder ab zu rufen... ich hab aber leider keine ahnung wie ich das am besten machen kann/soll...

mfg

[Hansa]

Hi,

Zitat von inzzi:

... Im gegenzug erhalte ich die erlaubnis das programm weiter zu verwenden...

Erlaubnis, das eigene Programm zu verwenden??? Schön blöd. Ist das ein "Fremdprogramm" ist das sowieso alles für die katz. Zumindest von der Telekom kriege ich morgen Auskunft.

Gruß
Hansa

[Jan]

Hallo inzzi,
Die, in ein Formular, eingegebenen Werte lassen sich so auslesen:

Code:

var eingabe:string;
begin
eingabe:=form1.WebBrowser1.OleObject.Document.Forms.item(0).Elements.item('Feldname').value;
end;

Gruß
Jan

[inzzi]

hi jan...
ums auslesen geht es nicht.. das hab ich schon (durch hilfe von DP) geschafft. Jetzt geht es darum die ausgelesenen Texte zu Speichern. In eine *.txt Datei oder so etwas in der richtung. Um sie später wieder öffnen zu können... und da hab ich leider keinerlei erfahrung (blutiger anfänger ;P)

mfg..

[inzzi]

Zitat von Hansa:

Hi,

Zitat von inzzi:

... Im gegenzug erhalte ich die erlaubnis das programm weiter zu verwenden...

Erlaubnis, das eigene Programm zu verwenden??? Schön blöd.

Gruß
Hansa

lol.. verwenden kann ichs natürlich.. aber veröffentlichen darf ich es nicht ohne die erlaubnis vom Provider, soll ja jeder was davon haben =)

[Daniel B]

Hi,

benutze doch SaveToFile(); zum Speichern der Daten und LoadFromFile(); zum Laden der Daten.

Grüsse, Daniel

[inzzi]

Zitat von Daniel B:

Hi,

benutze doch SaveToFile(); zum Speichern der Daten und LoadFromFile(); zum Laden der Daten.

Grüsse, Daniel

kannst du das bitte etwas genauer erklären ??

und wie kann ich mehrer telefonnummern in eine datei packen, und dann nur bestimmte zeilen wiedergeben ??

mfg...

[Daniel B]

Wie wärs denn mit der OH? Oder mit der Suchfunktion hier im Forum?

Für ne ListBox:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ListBox1.Items.SaveToFile('C:\MeineDatei.end');
end;

Für ne Memo:

Delphi-Quellcode:

procedure TForm1.Button3Click(Sender: TObject);
begin
  Memo1.Lines.SaveToFile('C:\MeineDatei.end');
end;

Wie Du jetzt LoadFromFile hinschreiben musst, bekommst Du sicherlich selbst heraus.

Grüsse, Daniel