Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Listbox + Dialogfenster (https://www.delphipraxis.net/124655-listbox-dialogfenster.html)

thiagojonas 22. Nov 2008 14:51


Listbox + Dialogfenster
 
Hallo Leute ich habe ein Dialog:

Delphi-Quellcode:
if Application.MessageBox('Wollen Sie wirklich '+' aus der Datenbank entfernen?', 'Entfernen', MB_ICONQUESTION or MB_YESNOCANCEL) = IDYES then
Ich möchte gerne den Namen anzeigen lassen, welcher entfernt werden soll.

Die Namen befinden sich in einer Listbox.
Wie kriege ich also den makierten Namen in die obere Dialogabfrage rein?

Bei Edit-Feld würde ich pauschal sagen so:

Delphi-Quellcode:
(...blabla '+edit1.text +' blabla...')
Aber das geht auch nicht :(

Kann mir jemand weiterhelfen?
Danke :-D :-D

Oreaden 22. Nov 2008 14:57

Re: Listbox + Dialogfenster
 
Wie wäre etwas in dieser Art
Delphi-Quellcode:
lb.items[lb.intemindex].text;
Meint das Orakel.

Schöne Grüße
aus Delphi

thiagojonas 22. Nov 2008 15:06

Re: Listbox + Dialogfenster
 
Danke, Problem 1 gelöst :)
Aber ich kann das nicht so einfach als ".text" schreiben. Die Dialogfunktion nimmt diese Schreibart nicht an.

DeddyH 22. Nov 2008 15:11

Re: Listbox + Dialogfenster
 
Delphi-Quellcode:
if Application.MessageBox(Format('Wollen Sie wirklich %s aus der Datenbank entfernen?',[lb.items[lb.intemindex]]), 'Entfernen', MB_ICONQUESTION or MB_YESNOCANCEL) = IDYES then

thiagojonas 22. Nov 2008 15:15

Re: Listbox + Dialogfenster
 
Danke, leider bekomme ich immer noch eine Fehlermeldung.
"Inkompatlibe Typen "string" und "PWideChar"

DeddyH 22. Nov 2008 15:16

Re: Listbox + Dialogfenster
 
Dann eben so:
Delphi-Quellcode:
if Application.MessageBox(PChar(Format('Wollen Sie wirklich %s aus der Datenbank entfernen?',[lb.items[lb.intemindex]])), 'Entfernen', MB_ICONQUESTION or MB_YESNOCANCEL) = IDYES then

thiagojonas 22. Nov 2008 15:18

Re: Listbox + Dialogfenster
 
Super Super Super :thumb: :thumb: :thumb: :thumb: :thumb: :thumb:

Vielen Dank :-D


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:38 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz