https://forum.lazarus.freepascal.org/in ... l#msg74742
Oh ein Alter Hut. Typisierte Konstanten sind keine Konstanten ? Wie macht ihr das so? Gibt es ein workaround?
Die Suche ergab 35 Treffer
- Do 29. Jan 2026, 23:26
- Forum: Freepascal
- Thema: case ohne const
- Antworten: 7
- Zugriffe: 1538
- Do 29. Jan 2026, 22:41
- Forum: Freepascal
- Thema: case ohne const
- Antworten: 7
- Zugriffe: 1538
Re: case ohne const
program CaseTest;
{$mode ObjFPC}{$H+}{$J-}
uses
SysUtils, Classes;
const
ftAUTODETECT: UInt8 = 0;
ftAVIF : UInt8 = 1;
ftBMP : UInt8 = 2;
ftCUR : UInt8 = 3;
ftGIF : UInt8 = 4;
ftICO : UInt8 = 5;
ftJPG : UInt8 = 6;
ftJXL : UInt8 = 7;
ftLBM : UInt8 = 8;
ftPNG : UInt8 = 9;
var ...
{$mode ObjFPC}{$H+}{$J-}
uses
SysUtils, Classes;
const
ftAUTODETECT: UInt8 = 0;
ftAVIF : UInt8 = 1;
ftBMP : UInt8 = 2;
ftCUR : UInt8 = 3;
ftGIF : UInt8 = 4;
ftICO : UInt8 = 5;
ftJPG : UInt8 = 6;
ftJXL : UInt8 = 7;
ftLBM : UInt8 = 8;
ftPNG : UInt8 = 9;
var ...
- Di 13. Jan 2026, 21:54
- Forum: Benutzung der IDE
- Thema: kompakte IDE ohne "Andocken" - geht das?
- Antworten: 4
- Zugriffe: 1195
Re: kompakte IDE ohne "Andocken" - geht das?
Gelöst. Vielen Dank!
- Di 13. Jan 2026, 14:15
- Forum: Benutzung der IDE
- Thema: kompakte IDE ohne "Andocken" - geht das?
- Antworten: 4
- Zugriffe: 1195
kompakte IDE ohne "Andocken" - geht das?
Hallo,
ich nutze die "Docked IDE" variante und Laz. 4.5 und habe von der Möglichkeit gelesen den "Desktop" zu speichern und zu laden. Das hilft mir erstmal weiter.
Ich möchte eigentlich nur eine Kompakte IDE mehr nicht =) Am besten wäre es aber wenn ich bei meiner persönlichen bestmöglichen ...
ich nutze die "Docked IDE" variante und Laz. 4.5 und habe von der Möglichkeit gelesen den "Desktop" zu speichern und zu laden. Das hilft mir erstmal weiter.
Ich möchte eigentlich nur eine Kompakte IDE mehr nicht =) Am besten wäre es aber wenn ich bei meiner persönlichen bestmöglichen ...
- Do 1. Jan 2026, 19:44
- Forum: Units/Komponenten
- Thema: SDL3 (Simple DirectMedia Layer) Packages
- Antworten: 97
- Zugriffe: 104151
- Do 1. Jan 2026, 16:48
- Forum: Units/Komponenten
- Thema: SDL3 (Simple DirectMedia Layer) Packages
- Antworten: 97
- Zugriffe: 104151
Re: SDL3 (Simple DirectMedia Layer) Packages
https://github.com/libsdl-org/SDL/relea ... ease-3.4.0
paar schöne features sind mit dabei
Vielen Dank Mathias für deine Arbeit die du da reinsteckst!
paar schöne features sind mit dabei
Vielen Dank Mathias für deine Arbeit die du da reinsteckst!
- So 15. Jun 2025, 09:32
- Forum: Freepascal
- Thema: numerische Keys für TDictionary/TObjectDictionary
- Antworten: 7
- Zugriffe: 3634
Re: numerische Keys für TDictionary/TObjectDictionary
Hallo zusammen,
@Niesi, Warf: Na wenn es für ein als hashmap impementiertes TDictionary egal ist, genau das wollte ich wissen. Bei einem Dictionary sind die keys immer einzigartig und ich brauche mich darum kaum zu kümmern, außer beim vergeben von keys. Diesen Vorteil sehe ich beim Array gar nicht ...
@Niesi, Warf: Na wenn es für ein als hashmap impementiertes TDictionary egal ist, genau das wollte ich wissen. Bei einem Dictionary sind die keys immer einzigartig und ich brauche mich darum kaum zu kümmern, außer beim vergeben von keys. Diesen Vorteil sehe ich beim Array gar nicht ...
- Sa 14. Jun 2025, 06:24
- Forum: Freepascal
- Thema: numerische Keys für TDictionary/TObjectDictionary
- Antworten: 7
- Zugriffe: 3634
numerische Keys für TDictionary/TObjectDictionary
In meinem Programm lade ich viele Dateien nacheinander und jeder Datensatz soll über einen numerischen Wert im Programm angesprochen werden können.
uses
Classes, Generics.Collections;
type
TDict = specialize TObjectDictionary<Longint, TKlasse>;
zu den numerischen Keys habe ich eine Frage ...
uses
Classes, Generics.Collections;
type
TDict = specialize TObjectDictionary<Longint, TKlasse>;
zu den numerischen Keys habe ich eine Frage ...
- Di 3. Jun 2025, 21:42
- Forum: Units/Komponenten
- Thema: SDL3 (Simple DirectMedia Layer) Packages
- Antworten: 97
- Zugriffe: 104151
Re: SDL3 (Simple DirectMedia Layer) Packages
Danke Mathias. Mal sehen wann dieses feature offiziell heraus kommt.
- Mo 2. Jun 2025, 07:44
- Forum: Units/Komponenten
- Thema: SDL3 (Simple DirectMedia Layer) Packages
- Antworten: 97
- Zugriffe: 104151
Re: SDL3 (Simple DirectMedia Layer) Packages
Hallo Mathias,
kannst du mal schauen, in SDL_surface.inc fehlt die Konstante
https://wiki.libsdl.org/SDL3/SDL_ScaleMode
Danke für die Bereitstellung der Units.
kannst du mal schauen, in SDL_surface.inc fehlt die Konstante
Code: Alles auswählen
const SDL_SCALEMODE_PIXELART = 2;Danke für die Bereitstellung der Units.
- Di 15. Apr 2025, 19:05
- Forum: Freepascal
- Thema: TComponent
- Antworten: 0
- Zugriffe: 3795
TComponent
Hi zusammen,
die Eigenschaften dieser Klasse, streaming zu ermöglichen, gleichzeitig auch noch andere Klassen/components als "root component" aufnehmen zu können und dann die Möglichkeit mit dem "Ownership". Das macht mich sehr neugierig. :D :idea: Ich habe schon ein paar Beispiele zum Thema ...
die Eigenschaften dieser Klasse, streaming zu ermöglichen, gleichzeitig auch noch andere Klassen/components als "root component" aufnehmen zu können und dann die Möglichkeit mit dem "Ownership". Das macht mich sehr neugierig. :D :idea: Ich habe schon ein paar Beispiele zum Thema ...
- Di 1. Apr 2025, 16:38
- Forum: Einsteigerfragen
- Thema: Enum als Bereich für Arrays
- Antworten: 13
- Zugriffe: 6840
Re: Enum als Bereich für Arrays
In dem beschriebenen Fall ist der erste Index automatisch 0 und die weiteren Index-Werte sind fortlaufend. Das stimmt schon, es macht eigentlich keinen Sinn in eine Zahl umzuwandeln.

Danke Euch für die ausführlichen Antworten!
Manchmal ist Informatik schwer begreifbar
Danke Euch für die ausführlichen Antworten!
Manchmal ist Informatik schwer begreifbar
- Mo 31. Mär 2025, 21:14
- Forum: Einsteigerfragen
- Thema: Enum als Bereich für Arrays
- Antworten: 13
- Zugriffe: 6840
Re: Enum als Bereich für Arrays
@Andy Nightingale: Frage 1 beantwortet. Danke
---
Zur 2. Frage: für das Enum ein Array anlegen mit index?
---
Zur 2. Frage: für das Enum ein Array anlegen mit index?
Code: Alles auswählen
const
count = 7;
CLogPriorityDesc : Array[0..count-1] of String =
('UNKNOWN', 'VERBOSE', 'DEBUG', 'INFO', 'WARNING', 'ERROR', 'CRITICAL');- Mo 31. Mär 2025, 20:53
- Forum: Einsteigerfragen
- Thema: Enum als Bereich für Arrays
- Antworten: 13
- Zugriffe: 6840
Enum als Bereich für Arrays
type
TLogPriorities = (lpUNKOWN, lpVERBOSE, lpDEBUG, lpINFO, lpWARN, lpERROR, lpCRITICAL);
Das probiere ich gerade aus, funktioniert auch Klasse! Der erste Index ist automatisch 0.
Wie bekomme ich den Integer-Wert von einem Index heraus?
type
TLogPriorityInfo = Array[TLogPriorities] OF ...
TLogPriorities = (lpUNKOWN, lpVERBOSE, lpDEBUG, lpINFO, lpWARN, lpERROR, lpCRITICAL);
Das probiere ich gerade aus, funktioniert auch Klasse! Der erste Index ist automatisch 0.
Wie bekomme ich den Integer-Wert von einem Index heraus?
type
TLogPriorityInfo = Array[TLogPriorities] OF ...
- So 30. Mär 2025, 16:26
- Forum: Einsteigerfragen
- Thema: Vertseh das mit den Units noch nicht richtig.
- Antworten: 17
- Zugriffe: 7981
Re: Vertseh das mit den Units noch nicht richtig.
@Andy Nightingale: Also wenn ich das richtig verstehe willst du mit Lazarus loslegen und an einer GUI-Anwendung herumbasteln, dann eigenen Code bzw. Klassen in Units auslagern?
wichtig ist die Projektstruktur, siehe auch Projekt -> Projektinspektor:
projektinspektor.png
Der Inspektor zeigt alle ...
wichtig ist die Projektstruktur, siehe auch Projekt -> Projektinspektor:
projektinspektor.png
Der Inspektor zeigt alle ...