-
Forum: Win32/Win64 API (native code)
Delphi
by julchen,
26. Jan 2021
Mittermeier läuft :-D :thumb:
Wenigstens ein bisschen Glück heute Abend. :wink:
-
Forum: Win32/Win64 API (native code)
Delphi
by julchen,
26. Jan 2021
Danke für den Tipp. :thumb:
An mit im Nachnamen habe ich nicht gedacht.
"mit :" hat es wieder zerrissen, aber mit " mit" läuft bis jetzt. :-D
VG und auf zum nächsten Problem ...
-
Forum: Win32/Win64 API (native code)
Delphi
by julchen,
26. Jan 2021
Hallo Narium,
ich habe es hinbekommen:
procedure TForm1.Button2Click(Sender: TObject);
var
i : Integer;
sl : TStringList;
sAnrede : String;
-
Forum: Win32/Win64 API (native code)
Delphi
by julchen,
25. Jan 2021
Hallo und guten Abend,
der Code/ die Codes funktionieren.
Und auch noch, wenn ich dran rumgepfuscht habe.
Das ist die gute Nachricht.
Die schlechte Nachricht:
Die Datei, aus der ich die Daten ziehe, enthält irgendwas an versteckten Zeichen.
Da muss ich mal sehen, wo das Problem ist.
Lade ich die Daten aus meiner Liste, bekomme ich als Ergebnis:
-
Forum: Win32/Win64 API (native code)
Delphi
by julchen,
24. Jan 2021
Hallo,
warum funktioniert dein Code nicht?
Was mache ich da falsch?
// === laden ==============================================
procedure TForm1.Button1Click(Sender: TObject);
var str: TStringlist;
begin
str := Tstringlist.Create;
-
Forum: Win32/Win64 API (native code)
Delphi
by julchen,
22. Jan 2021
Hallo,
meine Beispieltexte haben noch eine zweite Hälfte, die für mich bis her nicht das Problem waren, da es fest definierte Zeichen gibt, die ich mit StringReplace gegen ein Semikolon tauschen konnte.
Mit eurem Code laufen die Texte auseinander.
Aus:
Herr Mustermann mit ABCDEFGHI/00A (1): Terminplan(08:00 Uhr)
Herr Mustermann, Max mit ABCDEFGHI/00A (1): Terminplan(08:00 Uhr)
Herr Dr....
-
Forum: Win32/Win64 API (native code)
Delphi
by julchen,
18. Jan 2021
Hallo,
vielen Dank für eure Hilfe und die tollen Codebeispiele.
Hätte ich nieeeeee geschafft.
Mit dem Titel habe ich mir überlegt, das ein Eintrag für alle Titel reicht.
Werde Morgen mit dem Code weiterarbeiten. Melde mich dann wieder.
Bis dahin und ich noch einen schönen Abend euch allen.
VG Julia
-
Forum: Win32/Win64 API (native code)
Delphi
by julchen,
17. Jan 2021
Das sieht schon gut aus.
Es gibt noch einen Fehler.
Zwischen Dr. (ohne Prof.) und Nachname werden zwei Semikolons eingefügt.
Dadurch verschiebt sich Dr. zu Prof.
-
Forum: Win32/Win64 API (native code)
Delphi
by julchen,
17. Jan 2021
Was ist Startstext?
Ich kann das nicht deklarieren.
-
Forum: Win32/Win64 API (native code)
Delphi
by julchen,
17. Jan 2021
Ich habe die Funktion CompareStrings gefunden.
Ich habe da den ganzen Morgen schon mit rumgespielt, aber es klappt nicht.
Habe schon alle möglichen Kombinationen durch und komme nicht weiter.
Wenn Herr kleiner als Prof ist, dann ein Semikolon, sonst zwei.
procedure TForm1.Button1Click(Sender: TObject);
var herr, prof: string;
begin
-
Forum: Win32/Win64 API (native code)
Delphi
by julchen,
17. Jan 2021
Die Anrede ist immer Herr oder Frau.
Es gibt immer ein mit.
-
Forum: Win32/Win64 API (native code)
Delphi
by julchen,
16. Jan 2021
Hallo und Danke für die bisherige Rückmeldung,
Die Daten sehen so aus, wie im Beispiel angeführt.
Einen Nachnamen hat jeder Mitarbeiter.
Ich kopiere die Liste in ein Memo.
Die Anzahl der vorgegebenen Elemente, seien es Leerzeichen oder Kommas kann ich nicht beeinflussen.
Nachname und Vorname sind immer durch ein Komma getrennt.
-
Forum: Win32/Win64 API (native code)
Delphi
by julchen,
15. Jan 2021
Hallo,
Ich habe eine Liste, die ich nach dem Schema anpassen möchte:
Anrede;Titel;Titel;Nachname;Vorname;mit
Die Liste ist so aufgebaut:
Herr Mustermann mit
Herr Mustermann, Max mit
Herr Dr. Mustermann mit
Herr Dr. Mustermann, Max mit