bild als prog. hintergrund

D2505 · Verfasst: Mo 06.12.10 18:28

hallo

ich habe folgende frage

bei meinem neuen programm in delphi 7 pe wollte ein gif bild als hintergrund haben nur wis ich nicht wie das gehen soll. :?:

Moderiert von Narses: Überflüssige Zeilenumbrüche/Leerzeilen entfernt.

Narses · Verfasst: Mo 06.12.10 18:48

Moin und

im Forum!

D2505 hat folgendes geschrieben :

bei meinem neuen programm in delphi 7 pe wollte ein gif bild als hintergrund haben nur wis ich nicht wie das gehen soll.

Saug dir von hier die TGIFImage-Unit, installiere sie laut Anleitung und dann kann die TImage-Komponente auch GIF-Bilder laden. :idea:

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.

D2505 · Verfasst: Mo 06.12.10 18:54

hi
ich mein an stelle von diesem grauen hintergrund ich weiß das es geht da mein ehm. inoformatik lehrer mir mal gezeigt hat

Narses · Verfasst: Mo 06.12.10 18:56

Moin!

D2505 hat folgendes geschrieben :

ich mein an stelle von diesem grauen hintergrund ich weiß das es geht da mein ehm. inoformatik lehrer mir mal gezeigt hat

Den Hintergrund kann man nicht soo einfach "wegmachen", aber du kannst ein TImage mit .Align := alClient und einem geladenen Bild "drüberlegen", dann sieht es so aus, wie du´s gerne hättest. :idea:

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.

D2505 · Verfasst: Mo 06.12.10 19:04

hab ich , aber wie bekomme ich ein bild darein
sorry aber ich programier grade erst wieder seit 2 wochen habe dafor 2 jahre pause gemacht

Narses · Verfasst: Mo 06.12.10 19:25

Moin!

D2505 hat folgendes geschrieben :

hab ich , aber wie bekomme ich ein bild darein

Die TImage-Kompo anklicken, dann im Objekt-Inspektor die Eigenschaft "Picture" suchen, rechts in dem Feld ist eine Art "Button", da draufklicken, dann kann man ein Bild auswählen. :idea:

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.

D2505 · Verfasst: Mo 06.12.10 19:28

und wie installire ich jetz diese gif unit da habe sie gedownloadet und aufgerufen

jaenicke · Verfasst: Mo 06.12.10 21:36

Siehe FAQ...
Can you tell me how to install GifImage as a component in delphi 7?

// EDIT:
Oder du fügst die Unit einfach deinem Projekt hinzu und lädst das GIF zur Laufzeit.

D2505 · Verfasst: Di 07.12.10 17:57

wie das einfach so :

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

procedure TForm1.Image1Click(Sender: TObject);
begin
load unit: GIFImage;
end;

end.

Moderiert von Narses: Delphi-Tags hinzugefügt

Narses · Verfasst: Di 07.12.10 18:12

Moin!

Hm

muss es denn unbedingt GIF sein? Geht nicht vielleicht auch JPG? :nixweiss:

Das geht nämlich etwas einfacher.

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.

jaenicke · Verfasst: Di 07.12.10 18:12

D2505 hat folgendes geschrieben :

wie das einfach so :
procedure TForm1.Image1Click(Sender: TObject);
begin
load unit: GIFImage;
end;

Sorry, aber wenn du nicht das kleinste bisschen Delphi kannst, hat das keinen Sinn. Da hast du dir eindeutig schon zu viel vorgenommen. Fang lieber am Anfang an...

Einen sehr guten Crashkurs findest du hier:
crashkurs.christian-stelzmann.de
und die neue Version speziell ab Turbo Delphi:
www.christian-stelzm...shkurs_reloaded.html

Ein weiteres Online-Buch:
de.wikibooks.org/wik...grammierkurs:_Delphi

Hier speziell schau dir an wie uses benutzt wird (das steht in deinem automatisch erzeugten Quelltext auch schon drin).

D2505 · Verfasst: Di 07.12.10 18:31

danke habe es jetzt wie im tut beschrieben so eingefügt

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, unit GIFImage;

type
  TForm1 = class(TForm)
    Image1: TImage;
    procedure Image1Click(Sender: TObject);

  private
    { Private-Deklarationen }
    original:tbitmap
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Image1Click(Sender: TObject);
begin

end;

end.

Moderiert von Narses: Anhang als inline-Code eingefügt.

platzwart · Verfasst: Di 07.12.10 19:29

So steht das sicherlich nicht im Tut (zweites mal uses)...

_________________
Wissenschaft schafft Wissenschaft, denn Wissenschaft ist Wissenschaft, die mit Wissen und Schaffen Wissen schafft. (myself)

D2505 · Verfasst: Do 09.12.10 21:05

platzwart hat folgendes geschrieben :

So steht das sicherlich nicht im Tut (zweites mal uses)...

wieso 2mal uses ?

jaenicke hat folgendes geschrieben :

Hier speziell schau dir an wie uses benutzt wird (das steht in deinem automatisch erzeugten Quelltext auch schon drin).

jaenicke · Verfasst: Do 09.12.10 21:08

Naja, dass dein Versuch falsch ist, sagt dir Delphi ja beim Kompilieren.

Er meint das Wort unit innerhalb der uses Klausel.

D2505 · Verfasst: Sa 11.12.10 18:45

Narses hat folgendes geschrieben :

Saug dir von hier die TGIFImage-Unit, installiere sie laut Anleitung und dann kann die TImage-Komponente auch GIF-Bilder laden. :idea:

cu
Narses

die hat bei mir nur fehler

jaenicke · Verfasst: Sa 11.12.10 18:50

D2505 hat folgendes geschrieben :

die hat bei mir nur fehler

Komisch, mein Delphi 7 PE auf dem Testrechner ist da anderer Meinung. Da hast du wohl wieder was falsch gemacht.

Aber ohne mehr Infos was passiert können wir natürlich auch nix dazu sagen (falls du das ernsthaft erwartet hattest)... :nixweiss:

D2505 · Verfasst: Sa 11.12.10 21:30

kann ich es auch als neue komponente einfügen ?
weil da sagt er fehler interface erwartet aber const gefunden und 100 anderer fehler

Moderiert von Martok: Doppelposting zusammengeführt.

welch version hast du den ich habe gifimaged2010b

jaenicke · Verfasst: Sa 11.12.10 23:57

D2505 hat folgendes geschrieben :

kann ich es auch als neue komponente einfügen ?

Nein, denn es ist nun einmal keine visuelle Komponente...
Es reicht die Unit dem Projekt hinzuzufügen, dann kannst du zur Laufzeit GIFs laden.

Du kannst aber schon auch die Unit in ein Package packen und es installieren. Dann kennt das normale TImage auch in Delphi selbst GIFs. Aber einfacher ist der erste Weg.

Und ich habe die selbe Version, ja...

Was genau :roll:

kommen denn für Fehler und an welcher Stelle? Und was hast du da genau gemacht?

D2505 · Verfasst: Di 14.12.10 17:46

dann nehme ich lieber doch ein unterstüztes datei format

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme