Deutsches Lazarusforum

Singlepin

Danke, warum prüfe ich auch nicht auf Count.

Singlepin

Ich lese mit wmic path win32_computersystemproduct get uuid in der Eingabeaufforderung die UUID aus.

Mit

function GetWindowsUUID: string;
var
Process:TProcess;
Output:TStringList;
Cmd,UUIDLine:string;
begin
Output:=TStringList.Create;
Cmd:='wmic path win32_computersystemproduct get uuid ...

Singlepin

Unter Windows hatte ich das immer so gemacht.

uses Windows

function AllowSetForegroundWindow(AHandle: HWND): Boolean; external 'user32.dll';

var
hFMapping:THandle;
FSpeicher:^THandle;
FHandle:THandle;
const appName='NAME';

implementation

procedure TForm1.FormShow(Sender: TObject);
begin ...

Singlepin

Code: Alles auswählen

uses
  Gdk2, Gtk2;

Singlepin

Der Fehler liegt in der UNDO-Funktion.

Code: Alles auswählen

destructor TSudoku.Destroy;
var
  p: Pointer;
begin
while UndoList.Count>0 do
  begin
  p:=UndoList.Objects[UndoList.Count-1];
  UndoList.Delete(UndoList.Count-1);
  FreeMem(p);
  end;
UndoList.Free;
inherited;
end;

Das sollte das Problem beheben.

Singlepin

Hier mal eine Version von Delphi nach Lazarus umgewandelt.
Getestet mit Ubuntu.

Singlepin

Sehr interessant und lehrreich https://www.behrenhoff.de/.
Der Quelltext ist für Delphi.
Damit es mit den Hintergrundfarben bei den TEdit's klappt habe ich TMemo's genommen.

Singlepin

Das ist sehr bedauerlich, gerade das Programm "dump1090d" hätte mich interessiert.

Singlepin

z.B. select upper("ä") liefert ä zurück.
Ich habe eine uncode.so und eine icu.so die das Problem lösen können.
Lade ich in den "DB Browser" diese Erweiterungen liefert upper("ä") Ä zurück.
Benutze ich sqlite3 in der Konsole kann ich mit .load ./unicode.so diese Erweiterung laden und upper arbeitet ...

Singlepin

Gute Nachricht!

Mit Zeos 8.0.0 ist der Fehler behoben.

Singlepin

Hier die Liste:

[url][https://www.freepascal.org/docs/ClassChart1.pdf/url]

Singlepin

Hallo MmVisual,

das bei meinen Codeschnipseln "Clear" davor und "Open" danach stehen habe ich voraus gesetzt.

Parameter über den Index anzusprechen ist Geschmackssache.
Beim Zugriff auf Datenbankfeldern ist "ParamByName" zu 99% die richtige Wahl, da würde ich dir zustimmen.

DM.ZQTitel.SQL.Text ...

Singlepin

Danke für die Antworten.

Nachdem ich tagelang das Problem hatte geht es jetzt wie ich es schon hatte.
Verstehe wer will.

Singlepin

folgendes geht

DM.ZQTitel.SQL.Add('SELECT * FROM audio WHERE(parentpath=:PWeg)and(filename LIKE :PFile)');
DM.ZQTitel.Params[0].AsString:='/home/meinName/media/USB/Arabella/';
DM.ZQTitel.Params[1].AsString:='Barry Ryan - Eloise.mp3';

das geht nicht

DM.ZQTitel.SQL.Add('SELECT * FROM audio ...

Singlepin

Ich nutze Zeos 7.2.6 mit Lazarus 2.0.6
Die Erstellung erfolgt z.B. so "CREATE TEMPORARY TABLE t_tmp LIKE t_bsp".
Mit INSERT und UPDATE lassen sich die Daten bearbeiten.
Wenn ich die Tabelle mit einer DBGRID oder DBEdit verbinge, kann ich die Daten
zwar Anzeigen aber nicht ändern. Feld ist ...

Deutsches Lazarusforum

Die Suche ergab 17 Treffer

Re: UUID Windowsrechner auslesen

UUID Windowsrechner auslesen [gelöst]

Re: erneuten Programmstart verhindern

Re: Button mit mehr-farbiger Schrift (GTK2)

Re: Anregung/Anstoß für ein Sudoku gesucht

Re: Anregung/Anstoß für ein Sudoku gesucht

Re: Anregung/Anstoß für ein Sudoku gesucht

Re: FlightRadar 4

SQLite upper bei Unicode

Re: Lazarus-Zeos-SQLite-Suchen

Re: Datei Speichern absichern

Re: Lazarus-Zeos-SQLite-Suchen

Re: Lazarus-Zeos-SQLite-Suchen

Lazarus-Zeos-SQLite-Suchen

Zeos Temporary Table Bug?