Deutsches Lazarusforum

Gib doch mal die ganze Fehlermeldung durch.

PascalDragon hat geschrieben: Mo 21. Sep 2026, 23:00 Danke! Nächstes Mal nur bitte auf Englisch melden, da der Bug Tracker nunmal auf Englisch ist.

Da hat mir wohl der Translator einen strich durch die Rechnung gemacht.

Müsste mir dies nicht beim kompilieren um die Ohren fliegen ?
var
A: array[0..127] of single;
B:Single;

begin
A := PSingle(GetMem(128 * 4)); // geht
Freemem(PSingle(A)); // geht
A := Pointer(GetMem(128 * 4)); // Fehler

B := PSingle(GetMem(128 * 4)); // Fehler
B := Single(GetMem(128 * 4 ...

So sollte die Warnung weg sein,

TBitBtn ist das Stichwort. Da kann man Glyphe einfügen.

Ist doch wieder eine Panikmache.

Der verschollene Pluto ist wieder da.

Pluto war doch der, welcher viel mit AVR und FPC machte.

Willkommen zurück.

Schönes Alter, Da war das Forum geboren, als ich mein erster vernümftigen Internet Anschluss ohne ISDN hatte.
Kochte dazumal das Lazarus Forum auch so wie das Delphi Forum, Bei Delphi kamen im 5min Takt neue Beiträge.

Hat mich grade neugierig gemacht :wink:

Global und Lokal, beides funktioniert bei mir:


var Pointer:String;

procedure TForm1.FormCreate(Sender: TObject);
begin
Pointer:='Hallo';
Caption:=Pointer;
end;

und auch das geht:

procedure TForm1.FormCreate(Sender: TObject);
var Pointer:String ...

Ich habe gerade dies vor meiner Nase und die proceduren werden anstandslos kompilert.
Darf dies so sein. oder ist das ein Bug ?
Ist es aber ausserhalb der procedure, dann motzt er wie erwartet.
program Project1;

procedure test1(pointer: pointer); // geht
begin
pointer := nil;
end;

procedure ...

Was ich vermisse, das ich zu einer Deklaration springen kann und zurück.

Codeblooks macht dies sicher, wen man normal für den Desktop Codet. Ich vermute für Embeded System lässt sich dies sicher auch einrichten.

Code-Blocks wäre vielleicht noch etwas für dich.

Oder man verwendet einen einfachen Text-Editor, wie der xed von Mint. Kompilieren kann man da rasch auf der Konsole, bei einfachen Sache mache ich es so.

Ich hatte alles mit libhdf5 deklariert und wollte es auf libhdf5_serial um zu benennen, als habe ich F2 gedrückt um alle um zu benennen.
Vielfach steht es dann doppelt dort, oder es passiert gar nichts. Siehe Anhang.
Und es hat praktisch in jeder Unit solche Ausreisser.

Dies ist mir schon vor ...

Also irgendwie wie Lotto, je nach Lust und Laune bewegt sich das ganze.

procedure TForm1.Button3Click(Sender: TObject);
var
x, y: int64;
begin
x := Random(200);
y := Random(200);
Caption := IntToStr(x) + ' - ' + IntToStr(y);
ScrollBox1.VertScrollBar.Position := x;
// ScrollBox1.HorzScrollBar ...