Einzelnen Beitrag anzeigen

Benutzerbild von Aphton
Aphton

Registriert seit: 31. Mai 2009
1.198 Beiträge
 
Turbo Delphi für Win32
 
#14

AW: Prozedur zusammenbauen

  Alt 17. Nov 2012, 22:21
Delphi-Quellcode:
DrawTextAcrossCols([arrColText[0,b]]); Wenn es zwei sind, dann halt so:

DrawTextAcrossCols([arrColText[0,b], [arrColText[1,b] ]); usw.
daraus schließe ich, dass es sich klarerweise um ein zwei dimensionales Array handelt.
Du willst von diesem Array jeweils die ersten Werte übergeben.. Sprich [0,0], [1, 0], [2,0]..
-Edit- Nicht die ersten, sondern die "b" ten Elemente -/Edit-
Im angehänten Bild ist dies genau der rot markierte Bereich!
-Edit- B ist in diesem Fall 0 -/Edit-
GENAU das ist auch ein Array..
dazu musste es erst bilden:

Delphi-Quellcode:
var
  roterBereich: Array of String;
begin
  SetLength(roterBereich, Length(arrColText));
  for i := 0 to high(roterBereich) do
    roterBereich[i] := arrColText[i,b];
und anschließend rufst du die Methode ganz einfach auf..
Delphi-Quellcode:
//so
DrawTextAcrossCols(roterBereich);
Und noch etwas - lies dir bitte ein paar Tutorials zu Arrays durch.
Miniaturansicht angehängter Grafiken
untitled.png  
das Erkennen beginnt, wenn der Erkennende vom zu Erkennenden Abstand nimmt
MfG

Geändert von Aphton (17. Nov 2012 um 22:28 Uhr)
  Mit Zitat antworten Zitat