Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
 
FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen  RegistrierenRegistrieren
ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin
Zur Begleitseite des Forums / Chat / Impressum
Aktueller Forenpartner:

ARTIKEL verwaltung

 
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu QBasic.
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
mlb



Anmeldungsdatum: 20.08.2006
Beiträge: 7

BeitragVerfasst am: 28.10.2006, 16:58    Titel: ARTIKEL verwaltung Antworten mit Zitat

habe nun alles bis auf listendruck geschafft!!
bitte hilf mir jezt mal wer??
ich meine wozu gibts das forum wenn mir kein einziger antwortet!???!?!?

es is echt wichitg!!

listendruck =

drei mal das anzeigen

Nummer
Bezeichnung
Liferatn1 PReis1
Lif 2 Preis2
Lif3 PReis3

und dann sole s gedruckt werden


hoffe das mir jetz werd helfen kann

DANKE schon mal
mfg

mlb


Code:



'----------------------------------------------------------------------------------------
'--------------------------------------------------------------------------------------------- LISTENDRUCK

druck:

CLS
OPEN "C:\artikel.dat" FOR INPUT AS #1
WHILE NOT EOF(1)
LINE INPUT #1, arec$

gefunden = 0

'RECORD IN EINZELFELDER ZERLEGEN

anummer = LEFT$(arec, 15)

aartikel = MID$(arec, 16, 15)

alieferanteins = MID$(arec, 31, 15)

apreis = MID$(arec, 46, 5)

alieferantzwei = MID$(arec, 51, 15)

apreisz = MID$(arec, 66, 5)

alieferantd = MID$(arec, 71, 15)

apreisd = MID$(arec, 86, 5)
WEND

LOCATE 17, 4
PRINT "Nummer:    "; anummer

LOCATE 19, 4
PRINT "Bezeichnung:  "; aartikel; "                         ";

LOCATE 21, 4
PRINT "Lieferanten:  ";
LOCATE 21, 20
PRINT alieferanteins
LOCATE 21, 38
PRINT alieferantzwei
LOCATE 21, 56
PRINT alieferantd

LOCATE 23, 4
PRINT "Preise/EUR: ";
LOCATE 23, 20
PRINT ""; apreis; "";
LOCATE 23, 38
PRINT ""; apreisz; "";
LOCATE 23, 56
PRINT ""; apreisd; "";

reak$ = INPUT$(1)           'WEITER MIT TASTE

CLOSE #1

RETURN








_________________
so einfach wie möglich, so kompliziert wie notwendig
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden MSN Messenger
Michael Frey



Anmeldungsdatum: 18.12.2004
Beiträge: 2577
Wohnort: Schweiz

BeitragVerfasst am: 29.10.2006, 09:41    Titel: Antworten mit Zitat

Verwende zum drucken einfach LPRINT statt PRINT.
_________________
http://de.wikibooks.org/wiki/FreeBasic Jede Hilfe für dieses Buch ist Willkommen!
http://de.wikibooks.org/wiki/FreeBasic:_FAQ FAQ zu Freebasic (im Aufbau, hilfe Willkommen)
Neu mit Syntax Highlight
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Elvis



Anmeldungsdatum: 01.06.2006
Beiträge: 818
Wohnort: Deutschland, BW

BeitragVerfasst am: 29.10.2006, 12:26    Titel: Re: ARTIKEL verwaltung Antworten mit Zitat

mlb hat Folgendes geschrieben:

bitte hilf mir jezt mal wer??
ich meine wozu gibts das forum wenn mir kein einziger antwortet!???!?!?

es is echt wichitg!!

Sei doch nicht so ungeduldig... Kopf schütteln

Grüße, Elvis
_________________
Geforce 7300GT (256MB GDDR3, Gainward) -- 2x 512MB (DDR2 800, MDT) -- AMD Athlon64 X2 EE 3800+ -- Asrock ALiveNF5-eSATA2+
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
mlb



Anmeldungsdatum: 20.08.2006
Beiträge: 7

BeitragVerfasst am: 02.11.2006, 13:26    Titel: Antworten mit Zitat

ja sicher bentuez ich LPRINT.. aber ich brauche ja zuerst eine art FORMULAR mit den arikeln und den preisen und leiferanten von ein paar oder?

und dann drucke ich es so aus
ja is eh klar.. aber wie ich das anstelle weis ich end..
_________________
so einfach wie möglich, so kompliziert wie notwendig
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden MSN Messenger
Michael Frey



Anmeldungsdatum: 18.12.2004
Beiträge: 2577
Wohnort: Schweiz

BeitragVerfasst am: 02.11.2006, 19:41    Titel: Antworten mit Zitat

mlb hat Folgendes geschrieben:
ja sicher bentuez ich LPRINT.. aber ich brauche ja zuerst eine art FORMULAR mit den arikeln und den preisen und leiferanten von ein paar oder?

und dann drucke ich es so aus
ja is eh klar.. aber wie ich das anstelle weis ich end..

Versteh's nicht falsch, aber ich verstehe das Problem nicht.

Ist das Drucken selbst das Problem?
Geht das Drucken im Prinzip, aber es sieht schlecht aus?

Kannst du mal ein Beispiel für "C:\artikel.dat" posten?
Kannst du ein Beispiel machen wie es fertig aussehen soll?
_________________
http://de.wikibooks.org/wiki/FreeBasic Jede Hilfe für dieses Buch ist Willkommen!
http://de.wikibooks.org/wiki/FreeBasic:_FAQ FAQ zu Freebasic (im Aufbau, hilfe Willkommen)
Neu mit Syntax Highlight
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Flo
aka kleiner_hacker


Anmeldungsdatum: 23.06.2006
Beiträge: 1210

BeitragVerfasst am: 03.11.2006, 11:50    Titel: Re: ARTIKEL verwaltung Antworten mit Zitat

mlb hat Folgendes geschrieben:
habe nun alles bis auf listendruck geschafft!!
bitte hilf mir jezt mal wer??
ich meine wozu gibts das forum wenn mir kein einziger antwortet!???!?!?

es is echt wichitg!!

da hat er recht, sei nich so ungeduldig
mlb hat Folgendes geschrieben:

listendruck =

drei mal das anzeigen

Nummer
Bezeichnung
Liferatn1 PReis1
Lif 2 Preis2
Lif3 PReis3

und dann sole s gedruckt werden


hoffe das mir jetz werd helfen kann


ÄHhhm? sry, aber kein wort verstanden.
befolge mal bitte diese regeln:
wenigstens VERSUCHEN in deutscher rechtschreibung zu schreiben
und erklär das mal etwas näher

und dann editier den text am anfang und schreibs verständlich...
dann mal sehn ob ich dir helfen kann

und die gosubs Kopf schütteln ....
kannst du es vllt mal versuchen, mit SUB bzw. FUNCTION zu machen?
_________________
MFG
Flo

Satoru Iwata: Wer Spaß am Spielen hat, fragt nicht nach Grafik.

zum korrekten Verstaendnis meiner Beitraege ist die regelmaessige Wartung des Ironiedetektors unerlaesslich.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu QBasic. Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.

 Impressum :: Datenschutz