hallo

wenn ich einen Eintrag in meiner ListBox anklicke wird dieser mit Enter
Taste in eine Memo ünernommen. Nun soll aber wenn ich dies tue am ende des Eintrages in der ListBox die Uhrzeit wann ich den Eintrag angeklickt habe hinzugefügt werden.

wie geht so etwas ??

patrick dee

patrick dee hat folgendes geschrieben:

wie geht so etwas ??

Was? - Das:

Zitat:

die Uhrzeit

oder das:

Zitat:

Nun soll aber wenn ich dies tue am ende des Eintrages in der ListBox die Uhrzeit wann ich den Eintrag angeklickt habe hinzugefügt werden.

Zur Uhrzeit: s. "Now" in der Delphi-Hilfe. Code spare ich mir, denn in der Hilfe ist ein einfaches Beispiel dazu.

Zum Anhängen: den ausgewählten String kannst du ja durch die Abfrage von "ItemIndex" herausbekommen. Wenn du ihn hast, hängst du o.g. Beispiel für Datum/Uhrzeit einfach an.

Und fertig.

also noch einmal

ich wähle in meiner ListBox eine Zeile aus.
Drücke dann die Enter Taste :

rocedure THaupt_Form.ListBox1KeyPress(Sender: TObject; var Key: Char);
var
fp:Textfile;
help :String;
begin
IF Key = #13 then // Enter Taste auswahl
If ListBox1.Items[ListBox1.ItemIndex] [1] = 'W' then
Werbung_Form.ShowModal;
Uebergabe_Edit.Text := copy(ListBox1.Items[ListBox1.ItemIndex],0,7)+ '.wav'; // auslesen der ersten nummern 5000-01 + wav
help := Tools_Form.Edit2.Text + Uebergabe_Edit.Text;
AssignFile(fp, help);
Rewrite(fp);
CloseFile(fp);
end;

Nun soll mit ein wenig Abstand die Uhrzeit hinzugefügt werden.
Nach einem Beispiel habe ich geschaut in der D3 Hilfe da gab es aber nic unter "Now" Das Label1.Caption := TimeToStr(Now);
die Uhrzeit zeigt weiß ich. Aber da gab es nix für ListBoxen.

patrick dee

patrick dee hat folgendes geschrieben:

ich wähle in meiner ListBox eine Zeile aus. Drücke dann die Enter Taste

Ja, ich kann dir noch folgen.

Zitat:

Das Label1.Caption := TimeToStr(Now); die Uhrzeit zeigt weiß ich. Aber da gab es nix für ListBoxen.

Das wäre ja auch zu schön, wenn die Delphi-Hilfe exakt das bereitstellt, was man sich wünscht. Na ja, vielleicht in Delphi 8 ... So, aber jetzt mal im Ernst - wenn du weißt, dass

die Uhrzeit anzeigt, dann müsstest du eigentlich auch wissen, welcher Rückgabewert das ist. Oder? - Also: ist es ein Integer, ein Boolean, oder vielleicht ein String?
Was haben Strings nun mit Listboxen gemeinsam? Im Normalfall sind die Einträge einer Listbox eben solche. Wenn du also den gewählten Eintrag mit

anzeigen kannst, dann ist es auch möglich, an diesen Eintrag etwas ranzuhängen. Zum Beispiel die Uhrzeit ... zum Beispiel in Klammern, oder mit einem Leerzeichen ... wenn ich jetzt auf die Schnelle wüsste, wie das mit den Tabstopps in der Listbox war, würde ich dir auch das vorschlagen. Hm ...