Hallo Tim,
Delphi-Quellcode:
procedure TForm3.EditBuchClick(Sender: TObject);
var f, g, s, t : String;
begin
s := ListBox1.Items[ListBox1.ItemIndex];
t := InputBox('Buch ändern', s, '');
if t <> '' then
if MessageDlg(s + ' zu ' + t + ' ändern?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then
begin // <-- hier Breakpoint setzen
f := 'C:\Program Files\Vokabeltrainer XXL\' + t;
g := 'C:\Program Files\Vokabeltrainer XXL\' + s;
RenameFile(g, f);
Form3.FormActivate(Form3);
end;
end;
setze doch mal einen Breakpoint an der markierten Stelle
und lass Dir die Variablen f und g einmal ausgeben.
Variablen anschauen geht wenn Du die Variable markierst und dann crtl-F5
drückst. Die Variable wird dann der Watchlist hinzugefügt.
In der Watchlist werden die Werte der Variablen ausgegeben.
Ich bin mal gespannt ob f und g die Werte haben, die Du Dir so vorstellst.
Was vielleicht auch nicht schlecht wäre, Deinen Sourcecode ein wenig mehr zu kommentieren
und den ganzen Listboxen und Buttons Namen zu geben unter den man sich auch was vorstellen kann.
So ist es so ziehmlich unmöglich Dein Programm zu verstehen.
Grüße
Klaus