AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Schleife

Ein Thema von SaFu · begonnen am 21. Okt 2007 · letzter Beitrag vom 23. Okt 2007
Antwort Antwort
Seite 1 von 3  1 23   
Benutzerbild von SaFu
SaFu

Registriert seit: 8. Nov 2006
1.360 Beiträge
 
Delphi 10.3 Rio
 
#1

Schleife

  Alt 21. Okt 2007, 22:38
hab heute schon so viele dumme ´Fragen gestellt dann kommts auf die letzte auch nicht mehr an

Wie kann ich die zeilen auch noch hochzählen lassen

Delphi-Quellcode:
//====================Desks Umbennen============================================
procedure TForm1.desk0Bis4Umbenennen;
var zahl,zahl2,a, i : integer ;
    desk0 : String;
    Desk: array [0..99] of String;

begin
   zahl := StrToInt (Edit1.text) ;
   zahl2 := StrToInt (Edit3.text) ;

     desk0:= ('DESK-0' +' = TASK(' + Edit1.text + ') LPT(PP0) WX() WY() FONT() TITLE('+ Edit2.Text + ') START(pw)');

     for i:=0 to zahl2 do
      begin
       zahl:=zahl +1 ;
       Desk[i]:=('DESK-' +(IntToStr (i +1))+' = TASK(' + (IntToStr (zahl)) + ') LPT(PP0) WX() WY() FONT() TITLE('+ Edit2.Text + ') START(pw)');

       for a:= 38 to zahl2 do
         begin
          Memo2.Lines[a]:= desk[i];
         end;
      end;
     Memo2.Lines[37]:=(desk0);
end;
"... Wie gesagt, die Nutzer von 10, 12, 14 Zoll Display's werden deine Seite nicht in voller Pracht sehen können, ...

Surft Ihr mit dem Taschenrechner?"
  Mit Zitat antworten Zitat
Benutzerbild von inherited
inherited

Registriert seit: 19. Dez 2005
Ort: Rosdorf
2.022 Beiträge
 
Turbo Delphi für Win32
 
#2

Re: Schleife

  Alt 21. Okt 2007, 22:48
warum nimmst du nicht
Memo2.Lines[i+38]:= desk[i]; ?
Nikolai Wyderka

SWIM SWIM HUNGRY!
Neuer Blog: hier!
  Mit Zitat antworten Zitat
Benutzerbild von SaFu
SaFu

Registriert seit: 8. Nov 2006
1.360 Beiträge
 
Delphi 10.3 Rio
 
#3

Re: Schleife

  Alt 21. Okt 2007, 22:52
das geht doch so nicht oder

Die zeile 37 ist festgelegt danach soll die zeilen und die desks erhöht werden also ab zeile 38 und nur so hoch zählen wie die eingabe im edit3 ist
"... Wie gesagt, die Nutzer von 10, 12, 14 Zoll Display's werden deine Seite nicht in voller Pracht sehen können, ...

Surft Ihr mit dem Taschenrechner?"
  Mit Zitat antworten Zitat
Benutzerbild von inherited
inherited

Registriert seit: 19. Dez 2005
Ort: Rosdorf
2.022 Beiträge
 
Turbo Delphi für Win32
 
#4

Re: Schleife

  Alt 21. Okt 2007, 23:04
Sorry, aber ich verstehe nicht was du erreichen willst. Bitte bemühe dich klar zu äußern:
1. Was soll der Code tun
2. Was klappt nicht/Wo liegt das Problem.

Ich nehme an (der Kristallkugel sei dank) dass du von 0 bis zahl2 den Desk[i] ändern möchtest und das Ergebnis im Memo speichern möchtest, und zwar ab Zeile 38. Also wenn i=0, dann in Zeile 38, bei i=1 Zeile 39 usw.
Deswegen kannst du in jedem Schleifendurchlauf einfach auf Memo2.Lines[i+38] zugreifen.
Nikolai Wyderka

SWIM SWIM HUNGRY!
Neuer Blog: hier!
  Mit Zitat antworten Zitat
Benutzerbild von SaFu
SaFu

Registriert seit: 8. Nov 2006
1.360 Beiträge
 
Delphi 10.3 Rio
 
#5

Re: Schleife

  Alt 21. Okt 2007, 23:08
Also eigentlich will ich genau das erreichen

so habe ich es jetzt per hand mal gemacht und das in einer schleife so hoch wie Edit3 ist

Delphi-Quellcode:
 Memo2.Lines[37]:=(desk0);
     Memo2.Lines[38]:= desk[0];
     Memo2.Lines[39]:= desk[1];
     Memo2.Lines[40]:= desk[2];
     Memo2.Lines[41]:= desk[3];
     Memo2.Lines[42]:= desk[4];
     Memo2.Lines[43]:= desk[5];
     Memo2.Lines[44]:= desk[6];
     Memo2.Lines[45]:= desk[7];
     Memo2.Lines[46]:= desk[8];
 
// usw.
"... Wie gesagt, die Nutzer von 10, 12, 14 Zoll Display's werden deine Seite nicht in voller Pracht sehen können, ...

Surft Ihr mit dem Taschenrechner?"
  Mit Zitat antworten Zitat
Benutzerbild von inherited
inherited

Registriert seit: 19. Dez 2005
Ort: Rosdorf
2.022 Beiträge
 
Turbo Delphi für Win32
 
#6

Re: Schleife

  Alt 21. Okt 2007, 23:10
Und wo ist jetzt das Problem? Mach es doch mit Memo2.Lines[38+i]
Nikolai Wyderka

SWIM SWIM HUNGRY!
Neuer Blog: hier!
  Mit Zitat antworten Zitat
Benutzerbild von SaFu
SaFu

Registriert seit: 8. Nov 2006
1.360 Beiträge
 
Delphi 10.3 Rio
 
#7

Re: Schleife

  Alt 21. Okt 2007, 23:13
bekomm das irgenwie net hin

Delphi-Quellcode:
   for i:=0 to Zahl2 do
      begin
       zahl:=zahl +1 ;
       Desk[i]:=('DESK-' +(IntToStr (i +1))+' = TASK(' + (IntToStr (zahl)) + ') LPT(PP0) WX() WY() FONT() TITLE('+ Edit2.Text + ') START(pw)');
       Memo2.Lines[38+i]:= desk[i];
      end;
     Memo2.Lines[37]:=(desk0);
 end;
hab ich es an die falsche stelle gesetzt
"... Wie gesagt, die Nutzer von 10, 12, 14 Zoll Display's werden deine Seite nicht in voller Pracht sehen können, ...

Surft Ihr mit dem Taschenrechner?"
  Mit Zitat antworten Zitat
Benutzerbild von inherited
inherited

Registriert seit: 19. Dez 2005
Ort: Rosdorf
2.022 Beiträge
 
Turbo Delphi für Win32
 
#8

Re: Schleife

  Alt 21. Okt 2007, 23:15
So hatte ich mir das gedacht. Und was funktioniert daran nicht? *Kristallkugelrauskram*
Nikolai Wyderka

SWIM SWIM HUNGRY!
Neuer Blog: hier!
  Mit Zitat antworten Zitat
Benutzerbild von SaFu
SaFu

Registriert seit: 8. Nov 2006
1.360 Beiträge
 
Delphi 10.3 Rio
 
#9

Re: Schleife

  Alt 21. Okt 2007, 23:16
egal welche zahl ich ins edit3 eingeben es wird nur bis 6 hochgezählt
"... Wie gesagt, die Nutzer von 10, 12, 14 Zoll Display's werden deine Seite nicht in voller Pracht sehen können, ...

Surft Ihr mit dem Taschenrechner?"
  Mit Zitat antworten Zitat
Benutzerbild von inherited
inherited

Registriert seit: 19. Dez 2005
Ort: Rosdorf
2.022 Beiträge
 
Turbo Delphi für Win32
 
#10

Re: Schleife

  Alt 22. Okt 2007, 09:12
Sicher? Zeig mal deinen ganzen Code dieser Stelle.
Nikolai Wyderka

SWIM SWIM HUNGRY!
Neuer Blog: hier!
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 3  1 23   

Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

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 13:45 Uhr.
Powered by vBulletin® Copyright ©2000 - 2022, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf