Ausgabe ordnen

z1dirk · Beiträge: 23

Hi, im Augenblick gebe ich meinen kompletten Datensatz in einem Memo aus, doch nach ein paar Einträgen sieht alles total schief und krum aus.
Ich weis nicht wie ich immer genau name unter name, alter und alter , ...
Wenn es nicht im Memo geht, dann vieleicht in irgend einer Tabelle.

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:

type
  Tartikel = record
                  nr:integer;
                  name:string[35];
                  bez:string[35];
                end;

procedure TForm1.ausgabe(Pposition:integer);
var datei: file of Tartikel;
    artikel:tartikel;
begin
     assignfile(datei,'daten.dat');
     reset(datei);
     seek(datei,Pposition);
     read(datei,artikel);
     memo1.lines.add(IntToStr(Filepos(datei))+artikel.name+artikel.bez+IntToStr(artikel.nr));  
     closefile(datei);
end;

Gruß Dirk

MSCH · Verfasst: So 24.08.03 17:48

Nehme ein Font mit fester Zeichenbreite für dein Memo oder nimm gleich ein StringGrid.
grez
msch

_________________
ist das politisch, wenn ich linksdrehenden Joghurt haben möchte?

z1dirk · Beiträge: 23

die sache mit dem stringgrid funktioniert gut, aber mich interessiert noch wie du das mit dem Font mit fester Zeichenbreite meintest, kannst du mir das mal erklären.(so schritt für schritt)

hansa · Beiträge: 3079 Erhaltene Danke: 9

Nix Schritt für Schritt. :lol:

Schreibe mal einen Punkt und ein X auf ein Blatt Papier. Was ist breiter ? Richtig, das X. Es gibt Proportionalschriften, die nur soviel Platz brauchen, wie sie eben breit sind. Und dann gibt es noch Schriften (z.B. Courier), die FESTE Breiten haben, also wo der Punkt gennauso viel Platz beansprucht, wie das X. Das ist alles.

_________________
Gruß
Hansa

z1dirk · Beiträge: 23

Ach so. ich dachte wunder was jetzt kommt. :shock:

Naja stimmt. Aber noch mal zum stringgrid. ich hab es jetzt gefüllt mit ca. 30 daten, aber ich möchte jetzt sagen wir mal nur 2 mir anschauen, doch ich weis nicht wie ich das stringgrid leeren kann, sodass nix mehr drin steht. :?:

CenBells · Beiträge: 1547 Win 7 Delphi XE5 Pro

hallo,

zum leeren musst du über alle zeilen eine schleife machen und die items löschen, oder du setzt die rowcount auf 2.
Warum verwendest du kein DBGrid für die anzeige?

Gruß
Ken

_________________
Eine Klasse beschreibt die Struktur und das Verhalten einer Menge gleichartiger Objekte.

z1dirk · Beiträge: 23

hi, ich hab das mit rowcount und colcount gemacht . Aber welche Vorteile haben die DB sachen (DBStringGrid und so) und wie benutz ich sie. :?:

hansa · Beiträge: 3079 Erhaltene Danke: 9

CenBells hat folgendes geschrieben:

Warum verwendest du kein DBGrid für die anzeige?

Dann schau Dir mal den ersten Quelltext an. Wo ist da eine DB?

_________________
Gruß
Hansa

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme