| |
| |
|
 |
KompilierenMarkierenSeparieren
IF GETFOCUS(save&)
AUSLESEN Alle Eingaben auslesen
datei$=pfad$+"\adress2_data.csv"
einzel_ziel&=Long(taste#,8) Zeilenbestimmung - Rechter Mausklick auf die Zeile
SetItemTextEx(listview&,addr(bild$),0,einzel_ziel&,len(bild$)) Pfad zu Bild
SetItemTextEx(listview&,addr(na$),1,einzel_ziel&,len(na$)) Name
SetItemTextEx(listview&,addr(vn$),2,einzel_ziel&,len(vn$)) Vorname
SetItemTextEx(listview&,addr(fi$),3,einzel_ziel&,len(fi$)) Firma
SetItemTextEx(listview&,addr(ge$),4,einzel_ziel&,len(ge$)) Geburtsdatum
SetItemTextEx(listview&,addr(st$),5,einzel_ziel&,len(st$)) Strasse - Nr.
SetItemTextEx(listview&,addr(po$),6,einzel_ziel&,len(po$)) Postleitzahl
SetItemTextEx(listview&,addr(or$),7,einzel_ziel&,len(or$)) Wohnort
SetItemTextEx(listview&,addr(te$),8,einzel_ziel&,len(te$)) Telefon
SetItemTextEx(listview&,addr(fa$),9,einzel_ziel&,len(fa$)) Fax-Nr.
SetItemTextEx(listview&,addr(mo$),10,einzel_ziel&,len(mo$)) Handy
SetItemTextEx(listview&,addr(em$),11,einzel_ziel&,len(em$)) Email-Adresse
SetItemTextEx(listview&,addr(ba$),12,einzel_ziel&,len(ba$)) Bank
SetItemTextEx(listview&,addr(bl$),13,einzel_ziel&,len(bl$)) Bankleitzahl
SetItemTextEx(listview&,addr(kn$),14,einzel_ziel&,len(kn$)) Kontonummer
SetItemTextEx(listview&,addr(term$),15,einzel_ziel&,len(term$)) Termineintrag
SetItemTextEx(listview&,addr(hp$),16,einzel_ziel&,len(hp$)) Homepage-Adresse
IF FileExists(datei$)
mem_size&=GetNeededMemory(listview&,1)+5
DIM bereich#,mem_size&
mem_size&=ListviewToCsv(listview&,bereich#,0,0)
WriteFileQuick(addr(datei$),bereich#,0,mem_size&)
DISPOSE bereich#
EndIf
ENDIF
Wenn ich hiermit Eingaben abspeichern will, wird nur die erste Eingabe (das Bild) erkannt und geändert oder eingetragen. Alle anderen Daten, ob vorhanden oder neu werden nicht bearbeitet  Was ist falsch ? - Alle Eingaben werden circa Create(Edit.... erstellt und mit GETTEXT$ ausgelesen. Stehen auch als solche in den Editzeilen, lassen sich aber nicht überschreiben oder ändern
KompilierenMarkierenSeparieren"G:XPROFAN_10BILD_ADRESSOR_2ADRESS2_DATA\SELBST04.JPG","Horn","Horst","","03.08 1940","Alte Eppelheimer Str. 25","69115","Heidelberg","0622123913","","01774856962","info@web-treffpunkt.de","Sparkasse Heidelberg","","",". ","www.web-treffpunkt.de"
So sieht eine Zeile in der CSV-File aus |
|
| |
| |
| |
|
|
Frank
Abbing | Ich kann so keinen Fehler entdecken. Könntest du einen kurzen und lauffähigen Source posten?  |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | Hallo Horst,
Ich nehme mal an, Du füllst die Variablen in der Prozedur Auslesen, oder?
Hast Du nach oder in der Prozedur schon mal Breakpoints mit $D Auslesen,bild$,na$,...,hp$ gesetzt und was sind die Ergebnisse? |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 29.12.2006 ▲ |
|
| |
|
|
| @Jörg - mit $D werden die Variablen sauber aufgelistet -
@Frank
Wenn ich das Bild wechsle (das wird von einem anderen Dialogfenster her ausgewählt) und schreibe dann Text, wird dieser übernommen ! - Ohne die Bildwahl macht das Programm nichts. Kann es sein, dass dieses Unterfenster das Schreiben verhindert ?
Einen Beispieltext zu sortieren, dauert noch - siehe Messagebox |
|
| |
| |
| |
|
|
Frank
Abbing | Werde erst in Ruhe gesund. Gute Besserung!  |
|
| |
| |
| |
|
|
| |
| |
| |
| |
|
|
Frank
Abbing | Na siehste...  |
|
| |
| |
| |
|
(1.127)
Deutsch
English
Français
Español
Italia