Forum: Sonstige Fragen zu Delphi
Delphi
by Svenkan,
20. Okt 2008
Kann sein, dass es grad ein bisschen spät ist, aber das hier gibt mir den gleichen Fehler aus (hab das wegen der Uhrzeit auch nur schnell zur Probe zusammengebastelt!):
function FachLang(memo: TMemo;fach: String; erlaubt: Boolean; listbox_kurz,listbox_lang: TListBox): String;
var li, str_laenge: Integer;
fach_liste: String;
begin
if erlaubt then begin
str_laenge := Length(fach);
...
Forum: Sonstige Fragen zu Delphi
Delphi
by Svenkan,
19. Okt 2008
Hallo!
Folgendes Problem: Ich möchte einen bestimmten Inhalt durch den aus einer Listbox ersetzen. Dazu verwende ich folgende Funktion:
function FachLang(fach: String; erlaubt: Boolean; listbox_kurz,listbox_lang: TListBox): String;
var li: Integer;
begin
if erlaubt then begin
for li := 0 to listbox_kurz.Count -1 do
if ...