Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hansi,
28. Nov 2004
Danke für die Hilfe! Probiers gleich mal aus!
hat funktioniert! Falls einer dies später liest hier die Lösung für mich:
...
var i:Integer;
begin
For i:=1 to Query1.FieldCount-1 do
begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hansi,
28. Nov 2004
Ich bräuchte eine Anleitung wie ich aus einer Tabelle (man kann diese auch als zwichenschritt machen) Werte entnehme mit diesen rechne multiplizieren und dann in eine neue tabelle dies abspeichere.
Kannst Du mir da helfen?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hansi,
28. Nov 2004
Ich bin noch ziemlich am Anfang! :oops: :pale: :wall: :kotz:
Wie ist FireBird? Einfach oder komplex?
Wenn Du wissen willst was ich machen will schau doch bitte meine letten Threads an.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hansi,
28. Nov 2004
Damit bringt er ein Fehlermeldung(Keine Übereinstimmung der Typen im Ausdruck) Wahrscheinlich weil ich keine freie Spalte in der Tabelle habe, oder? Bei SELECT kann ich Doch nur Spalten(Felder) ansprechen die auch existieren, oder?
Kann ich die BErechnung auch in der While Schleife einfügen? Nur wie?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hansi,
28. Nov 2004
:wiejetzt:
Wo trage ich Deinen Code ein?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hansi,
28. Nov 2004
P.S. Was muss ich machen damit z.B. das Produkt von Wert1 und Wert2 in einer zusätzliuchen Spalte angezeigt wird?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hansi,
28. Nov 2004
SELECT Datum, Wert1, Wert2 FROM Tabelle WHERE Name='710000' AND Datum BETWEEN '01.01.2000' AND '31.12.2000'
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hansi,
28. Nov 2004
Schönen Sonntag!
Mit folgendem Code wird ein StringGrid mit Daten gefüllt. Sieht dann ungefähr dann so aus
Datum Wert1 Wert2 Mittelwert
20.11.2004 100 50 ...
procedure TForm1.FormCreate(Sender: TObject);
var x,y : Integer;
begin
if not Query1.IsEmpty then begin