Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by capo,
3. Sep 2008
Hi Sharky,
danke, da schau ich doch mal gleich nach.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by capo,
3. Sep 2008
Momentan mache ich es so:
procedure TForm1.Button2Click(Sender: TObject);
var i :integer;
s:string;
begin
for i := 0 to listbox1.Items.Count - 1 do
begin
if ListBox1.Selected then
begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by capo,
2. Sep 2008
Danke.
Ich verwende ja eine Listbox um mir den Inhalt des Ordners anzuzeigen
Wie kann ich die in deinem Beispiel verwenden?
.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by capo,
2. Sep 2008
Was meinst du mit iterieren?
Hast du ein Delphi-Beispiel für mich wie ich das mit den Bildern machen kann?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by capo,
2. Sep 2008
Hallo,
stimmt das klappt damit:
procedure TForm1.Button1Click(Sender: TObject);
var I:Integer;
SearchRec: TSearchRec;
begin
i := FindFirst(extractfilepath(application.exename) + 'Zeichnungen\*.jpg', faAnyFile, SearchRec);
while i = 0 do
begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by capo,
2. Sep 2008
Hallo,
ich öffne per Buttonclick ein Bild aus einem Ordner.
Image32.Bitmap.LoadFromFile(extractfilepath(application.exename) + 'Zeichnungen\Bild 006a.jpg');
In diesem Ordner sind noch x andere Bilder.
Wie kann ich nun mit zwei anderen Buttons (vor- und zurückbutton), ohne die Bildnamen der einzelnen Bilder zu kennen, jedes Bild anzeigen und navigieren (vor und zurück?
Sind alles Jpeg's.
...