AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Object-Pascal / Delphi-Language Delphi zeiger-array mit einem nicht zeiger-array multiplizieren

zeiger-array mit einem nicht zeiger-array multiplizieren

Ein Thema von kaddy · begonnen am 5. Mai 2003 · letzter Beitrag vom 6. Mai 2003
Antwort Antwort
kaddy

Registriert seit: 8. Apr 2003
Ort: Clausthal
39 Beiträge
 
Delphi 6 Personal
 
#1

zeiger-array mit einem nicht zeiger-array multiplizieren

  Alt 5. Mai 2003, 13:27
Hallo Netz,
ich möchte ein Zeiger-Array mit einem Nichtzeiger-Array multipizieren. Das sind die Codeausschnitte dazu.
Delphi-Quellcode:
const
t=6;
k=4;
max=1000;
type
 Tcold= array[0..47] of double;
 ptrTcold=^Tcold;
 var
i,l:integer;
ergebnis: ptrTcold;
x: ptrTcold;
lagerkosten: array [0..max] of double;
begin
        i:=0;
        l:=0;
        while i<k*t do begin
          while l<k do begin
          ergebnis[i]:=x[i]*lagerkosten[l];
          i:=i+1;
          l:=l+1;
          end;
        l:=0;
        end;
end;
Was mache ich falsch? Danke!
Gruß
Kaddy
  Mit Zitat antworten Zitat
Benutzerbild von Jens Schumann
Jens Schumann

Registriert seit: 27. Apr 2003
Ort: Bad Honnef
1.642 Beiträge
 
Delphi 2009 Professional
 
#2
  Alt 5. Mai 2003, 15:17
Hallo,
versuche es mal mit x[i]^
  Mit Zitat antworten Zitat
kaddy

Registriert seit: 8. Apr 2003
Ort: Clausthal
39 Beiträge
 
Delphi 6 Personal
 
#3
  Alt 5. Mai 2003, 15:32
Danke, geht aber leider nicht.
  Mit Zitat antworten Zitat
Benutzerbild von Jens Schumann
Jens Schumann

Registriert seit: 27. Apr 2003
Ort: Bad Honnef
1.642 Beiträge
 
Delphi 2009 Professional
 
#4
  Alt 5. Mai 2003, 17:44
Hallo,
ach ja, bislang hast du x: ptrTcold; nur im var Abschnitt deklariert.
D.h. innerhalb Deiner procedure zeigt x noch auf gar nix.
Entweder Du weist x irgendetwas zu, oder Du holst Dir über
GetMem(X,SizeOf(TArray)); // speicher holen
Hier etwas mit x machen
Freemem(X); // speicher wieder freigeben

Speicher. Dann musst Du aber noch den Inhalt von x initialisieren, sonst steht in x gerade das was in den Speicherzellen stand, bevor Du den Speicher reserviert hast.
  Mit Zitat antworten Zitat
kaddy

Registriert seit: 8. Apr 2003
Ort: Clausthal
39 Beiträge
 
Delphi 6 Personal
 
#5
  Alt 6. Mai 2003, 09:15
moin,
danke Dir hat damit jetzt geklappt.
Gruß
Kaddy
  Mit Zitat antworten Zitat
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 23:47 Uhr.
Powered by vBulletin® Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2019 by Daniel R. Wolf