Deutsches Lazarusforum

Servus!

Mit TryStrToInt64 lassen sich Strings in Zahlen bis (grob) +-2^32 umwandeln. Der Wertebereich für UInt64 beträgt 0 .. 2^64 - 1.
Gibt es dafür auch eine Konvertierungmöglichkeit, vielleicht so etwas wie TryStrToUInt64? Gefunden habe ich dazu nichts.

Gruß,

Adrian

Ja, ganz genau so ist es.

Servus! Ich arbeite mit folgender Konfiguration: Lubuntu 14.04 LTS Lazarus 1.0.10+dfsg-1 fpc 2.6.2 i386-linux-gtk 2 Die Lazarus-Dateien wurden im August 2015 über das Lubuntu-Software-Center heruntergeladen. Mein Problem ist, dass es mir während des Entwurfs nicht möglich ist, manche Änderungen an d...

Servus! Jetzt wirds lustig. Als ich mein Programm zusammenstrich, um nur noch das Nötigste bereitzustellen, hat es plötzlich funktioniert. Also ist der Programmcode eigentlich richtig. Nun mache ich mich daran, herauszufinden, warum es in der ursprünglichen Version nicht geht. Ich melde mich wieder!...

Servus! Ja, leider. Ich habe die Anzahl der Einträge geprüft (Ergebnis = 0) und das Eingelesene extra abgespeichert, wobei die daraus resultierende Datei eine Größe von 0 Bytes aufweist.   procedure TForm1.LadeSzene; var   rs: TLazarusResourceStream;   ResDa : TLResource;   SzeneStringList : TString...

Servus! Um einen Text, der in einer Resource gespeichert ist, zu verwenden, muß ich ihn natürlich zuerst einmal auslesen. Das kann so geschehen:   procedure TForm1.LadeSzene; var rs: TLazarusResourceStream; ResDa : TLResource; begin Szene := 'S1'; ResDa := LazarusResources.Find(Szene); if ResDa <> n...

Servus! An die Exceptions habe ich nicht gedacht, und LazarusResources.Find war mir unbekannt, ist aber genau das, was ich suchte. Vielen Dank für den Hinweis! @Scotty: Du meinst das Konzept sei verbesserungsfähig. Vielleicht kennst du noch die Abenteuer-Spiel-Bücher, die in den 80ern beliebt waren....

Servus! Momentan arbeite ich an einem Programm, in das eine relativ große Resource eingebunden ist. Letztere besteht aus mehr als 1000 Teilen, größtenteils Textabschnitte (reines txt-Format) und ein paar Grafiken im jpg-Format. Es kann aber sein, daß ich auch noch ein paar Klänge mit hineinbringen w...

Servus Theo!

Ach ja, das wars - vielen Dank!

Gruß,

Adrian

Servus! Unter XP mit Lazarus Version 0.9.29 arbeitend habe ich folgenden Effekt var Serie1Image, Serie2Image, Serie3Image, Serie4Image : TImage; SerienImage : Array [0..4] of TImage;   ...   SerienNummer := 1; with SerienImage[SerienNummer] do begin if not Visible then //-> hier erfolgt die Fehlerme...

Servus! Da hab ich mich so in meine Stream-Theorie verrannt, daß ich die Möglichkeit, das Bild als Variable zu speichern, einfach nicht mehr bedacht habe. Manchmal sieht man wirklich den Wald vor lauter Bäumen nicht mehr. Ja, MyStream.Free hab ich im Beispiel vergessen. Beim Original-Programm wirds ...

Servus! Danke für den Ratschlag, aber: procedure TForm1.Button1Click(Sender: TObject); var MyStream : TMemoryStream; begin MyStream := TMemoryStream.Create; Image1.Picture.Bitmap.SaveToStream(MyStream); Application.ProcessMessages; Image2.Picture.Bitmap.LoadFromStream(MyStream); Application.ProcessM...

Servus! Lazarus 0.9.27 / WindowsXP Ich habe in einem TImage eine Bitmap. Beim Programmstart speichere ich diese mittels "SaveToFile" ab, da ich sie im weiteren Verlauf noch mehrmals wieder im Urzustand brauche, wozu ich sie mir mit "LoadToFile" wieder lade. Abhängig von Bitmap-Gr...

Servus! Für eine kleine Anwendung (unter Windows) möchte ich die Tdbf-Komponente verwenden. Wenn ich gemäß nachfolgendem Programmauszug einen Datensatz löschen möchte, erhalte ich die Fehlermeldung Project Bibliothek raised exception class 'EDatabaseError' with nessage: CodiciDbf: Operation not allo...

Servus! Danke Christian, wenn die Formate unterschiedlich bzw. nicht kompatibel sind, dann kanns ja nicht klappen. Da werde ich wohl selber ein Konvertierungsprogramm machen müssen. Wo gibt es denn die Beschreibungen der Formate? @slai: Ja, die DataSource habe ich angegeben, siehe mein Anfangsbeitra...