Seite 1 von 2

Kursliste zum einkleben funktioniert auf einmal nicht mehr

Verfasst: Montag 17. August 2026, 08:39
von m.meier
Guten Tag zusammen,
ich benutze die Kurs 42-Version 3.33.30528 und kann auf einmal keine Kursliste zum Einkleben (die aus dem Standard-Downloadpaket) nicht mehr nutzen, weil ich immer die Fehlermeldung aus dem Anhang erhalte. Woran kann das liegen?

Re: Kursliste zum einkleben funktioniert auf einmal nicht mehr

Verfasst: Montag 17. August 2026, 09:08
von wschrewe
m.meier hat geschrieben: Montag 17. August 2026, 08:39Woran kann das liegen?
Entweder Sie aktualisieren Kurs 42 auf die aktuelle Version (s. Versionsgwschichte:)
09.05.2025 (Version: 3.33.36.532, Noten: 2.11.12.99)
....
Beim Druck von Kurslisten mit Tutoren kam es zu einem Laufzeitfehler, nun behoben.
....
oder Sie bearbeiten das Formular und entfernen das Datenfeld, das auf den Tutor zugreift.

Re: Kursliste zum einkleben funktioniert auf einmal nicht mehr

Verfasst: Montag 17. August 2026, 09:19
von m.meier
Ich habe auf die neue Version aktualisiert, erhalte allerdings weiter die Fehlermeldung. Wo genau finde ich das Datenfeld, das auf Tutoren zugreift?

Re: Kursliste zum einkleben funktioniert auf einmal nicht mehr

Verfasst: Montag 17. August 2026, 10:17
von wschrewe
m.meier hat geschrieben: Montag 17. August 2026, 09:19I erhalte allerdings die Fehlermeldung.
Das sollte nicht sein. Es könnte sein, dass Ihre Blockungsdaiei einen Fehler hat. Wenn der Fehler beim Druck nach "Extras->Spezial->Fehlerbereinigung" weiter auftritt, können Sie mir die Blockungsdatei schicken, dann schaue ich mir das an.

Re: Kursliste zum einkleben funktioniert auf einmal nicht mehr

Verfasst: Montag 17. August 2026, 10:32
von m.meier
An welche Adresse kann ich die Blockungsdatei schicken?

Re: Kursliste zum einkleben funktioniert auf einmal nicht mehr

Verfasst: Montag 17. August 2026, 10:37
von wschrewe
m.meier hat geschrieben: Montag 17. August 2026, 10:32An welche Adresse kann ich die Blockungsdatei schicken?
walter(at)wschrewe.de

Re: Kursliste zum einkleben funktioniert auf einmal nicht mehr

Verfasst: Montag 17. August 2026, 11:45
von wschrewe
Die Blockung und der Report sind in Ordnung. Die Kurslisten werden in der Vorschau problemlos angezeigt. Der Fehler entsteht, wenn die Ausgabe an den Drucker geschickt wird. Ich kann den Fehler reproduzieren, wenn in meinem Netzwerk kein Drucker angemeldet ist. Bitte überprüfen Sie Ihre Druckereinstellungen (Startmenü->Drucker und Geräte),

Re: Kursliste zum einkleben funktioniert auf einmal nicht mehr

Verfasst: Montag 17. August 2026, 13:51
von m.meier
Bei mir wird auch die Vorschau schon nicht korrekt angezeigt, andere Formulare (z. B. Kursliste mit Klausurnoten) kann ich als Vorschau sehen und auch drucken

Re: Kursliste zum einkleben funktioniert auf einmal nicht mehr

Verfasst: Montag 17. August 2026, 13:55
von wschrewe
m.meier hat geschrieben: Montag 17. August 2026, 13:51Bei mir wird auch die Vorschau schon nicht korrekt angezeigt,
Dann sollten Sie mir bitte auch den verwendeten Report schicken.

Re: Kursliste zum einkleben funktioniert auf einmal nicht mehr

Verfasst: Montag 17. August 2026, 16:39
von wschrewe
So, der Fehler ist gefunden. Irgend jemand hat den Report bearbeitet und unter "Berechnungen" die Funktion "onGetText" des Datenfeldes "DBText1", das mit der Kursbezeichnung verknüpft ist, bearbeitet.
Dabei wurden zwei Fehler eingebaut:
Ursprünglicher Code:

Code: Alles auswählen

procedure DBText1OnGetText(var Text: String);
begin
  If Kurse['Kursart']=72 Then  
// Fehler: `Kursart' ist ein Textfeld, der Vergleich mit einem Zahlenwert führt
// zu einbem Laufzeitfehler, weil versucht wird, den Feldinhalt in einen Zahlenwert
// zu konvertieren. 
  Text :='Lk' else
  Text:= 'Gk';
// Diese Umwandlung ist überdies nicht notwendig, weil *Kursart' berits den Klartext enthält
  Text:= Text + ' ' + Kurse['Fach'] + '-' + Kurse['Kursnr'];	
// Hier besteht der Fehler darin, dass versucht wird, einen numerischen Wert ('KursNr*)
(( an eine Zeichenkette anzuhängen.
 end;
Einfacher wird das gewünschte Resultat mit

Code: Alles auswählen

procedure DBText1OnGetText(var Text: String);
begin
  Text:=Kurse['Kursart']  + ' ' + Kurse['Fach'] + '-' + IntToStr(Kurse['Kursnr']); 
end;
erreicht
Den korrigierten Report habe ich angehängt.