Moin!
Ich lese mittels der Komponente "vgMySQL" [http://www.tsinet.ru/~vg/] Preise aus einer MySQL-DB aus.
Der entprechende Aufruf (gekürzt):

markieren

Code:

01 procedure TForm1.getPrice;
02 var preis: PAnsiChar;
03     preisStr: String;
04 begin
05     preis := FResult.FieldValueByName('preis');
06     preisStr := Format('%3m', [aPreis]); // * Fehler
07 end;

Die Funktion "FieldValueByName" liefert einen Wert vom Typ PAnsiChar.
Wie bekomme ich den jetzt mittels Format so formatiert (3 Nachkommastellen + Währungssymbol)?

Die Fehlermeldung lautet übrigens "Format '%3m' ungültig oder nicht kompatibel mit Argument.'.

Du kannst nicht einfach ein PAnsiChar in einen anderen Wert casten. Stattdessen solltest du mit einem SetString()-Aufruf einer Stringvariablen den Wert des PAnsiChar zuweisen und dann selber deine Formatierungsarbeit am String machen. Danach kannst du dann mit "%s" den String ausgeben lassen.

Zitat von Olli:

Du kannst nicht einfach ein PAnsiChar in einen anderen Wert casten.

Schade. Wär ja sonst auch zu einfach.

Zitat von Olli:

Stattdessen solltest du mit einem SetString()-Aufruf einer Stringvariablen den Wert des PAnsiChar zuweisen und dann selber deine Formatierungsarbeit am String machen. Danach kannst du dann mit "%s" den String ausgeben lassen.

Ok, danke. Ich habs jetzt so gelöst.

schönes Wochenende,

Stefan