Die Suche ergab 35 Treffer

von jammernich
Do 29. Jan 2026, 23:26
Forum: Freepascal
Thema: case ohne const
Antworten: 7
Zugriffe: 1538

Re: case ohne const

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?
von jammernich
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 ...
von jammernich
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!
von jammernich
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 ...
von jammernich
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!
von jammernich
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 ...
von jammernich
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 ...
von jammernich
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.
von jammernich
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

Code: Alles auswählen

const SDL_SCALEMODE_PIXELART = 2;
https://wiki.libsdl.org/SDL3/SDL_ScaleMode

Danke für die Bereitstellung der Units.
von jammernich
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 ...
von jammernich
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.
:? :idea:
Danke Euch für die ausführlichen Antworten!

Manchmal ist Informatik schwer begreifbar :mrgreen:
von jammernich
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?

Code: Alles auswählen

const
  count = 7;
  CLogPriorityDesc : Array[0..count-1] of String =
  ('UNKNOWN', 'VERBOSE', 'DEBUG', 'INFO', 'WARNING', 'ERROR', 'CRITICAL');
von jammernich
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 ...
von jammernich
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 ...