AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein kann ich mit einem edit feld noch einen text mit geben
Thema durchsuchen
Ansicht
Themen-Optionen

kann ich mit einem edit feld noch einen text mit geben

Ein Thema von kurzer_newbie · begonnen am 15. Aug 2004 · letzter Beitrag vom 15. Aug 2004
Antwort Antwort
kurzer_newbie

Registriert seit: 5. Sep 2003
Ort: Hamburg
20 Beiträge
 
Delphi 7 Enterprise
 
#1

kann ich mit einem edit feld noch einen text mit geben

  Alt 15. Aug 2004, 13:21
Hallo Leute

ich weiß nicht ob einer die frage versteht, ich versuche es mal zu erklären.

ich habe 3 editfelder wo man zahlen einträgt die als string einer variable zugewiesen werden
als
Delphi-Quellcode:
a := strtoint(edit1.text);//wert1
b := strtoint(edit2.text);//anzahl von wert1
c := strtoint(edit3.text);//wert2
d := strtoint(edit4.test);//anzahl von wert2
verwendet wird es so:
panel1.Caption:= ('...&test'+intostr(a)+'='+intostr(b)+'&test'+intostr(c)+'='+intostr(d)+'...'); ich hätte es aber ganz gern so das der wert von a fest mit dem edit2 verbunden ist zb. als label aber so das man es im formular nicht sieht.
also die person gibt die anzahl und ich hätte gern :
wenn anzahl > 0 dann (&test[wert1])-->als einen string oder wie auch immer '+intostr.....

ich hoffe man hat mich verstanden, ich möchte nur das &test12 zb. = a ist


gruß
Kurzer
  Mit Zitat antworten Zitat
kurzer_newbie

Registriert seit: 5. Sep 2003
Ort: Hamburg
20 Beiträge
 
Delphi 7 Enterprise
 
#2

Re: kann ich mit einem edit feld noch einen text mit geben

  Alt 15. Aug 2004, 14:40
Hi

ich habe schon was gefunden

ich mache es erstmal so:
Delphi-Quellcode:
var
a: string;
b: integer;

begin
a:='&test12';
b:=strtoint(edit2.text);

panel1.caption :=('...'+a+'='+inttostr(b)+'....');
end;

vieleicht hat ja jemand noch was besseres, jetzt muß ich nur noch schauen wie ich alles verschwinden lass wenn

b=0 ist.

gruß
Kurzer
  Mit Zitat antworten Zitat
kurzer_newbie

Registriert seit: 5. Sep 2003
Ort: Hamburg
20 Beiträge
 
Delphi 7 Enterprise
 
#3

Re: kann ich mit einem edit feld noch einen text mit geben

  Alt 15. Aug 2004, 15:00
Hi

und noch eine lösung:

Delphi-Quellcode:
begin
if strtoint(edit1.Text) > 0 then a1 := '&test18='+(edit1.Text);//wenn eingabe größer 0 ist dann erstelle a1 sonst nicht
if strtoint(edit2.Text) > 0 then b1 := '&test1='+(edit2.Text);

panel1.caption := ('....'+a1+''+b1+'....);
ich wußte garnicht das progen so einfach ist.

jetzt gehts ans speichern und laden der daten.


gruß
Kurzer
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 20:20 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz