| |
|
|
Torsten Rümker | comment oui dans qui Aider trop Profan joli trop lesen ist, peux on avec qui Message ~lb_dir une Listbox provoquer den le contenu des aktuellen Verzeichnisses Montrer trop laisser. c'est pourquoi habe je la fois folgende Zeilen Verfaßt zum testen. KompilierenMarqueSéparation Allerdings stürzt qui Interpreter chaque fois ab, si il versucht cela ganze zum courir trop apporter. et je viens simple pas sur elle comme richtig appeler doit.
comment toujours pour chacun Aider reconnaissant
Torsten |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 15.05.2006 ▲ |
|
|
|
|
RGH | Salut, qui dernier paramètre de SendMessage darf naturellement ne...aucune String son, mais doit qui Adresse sur qui Suchmaske son. So gehts: KompilierenMarqueSéparation $H Messages.ph
Declare Lb&, dir$
Cls
Lb& = Create("LISTBOX",%Hwnd,"",0023,0023,0302,0401)
dir$ = "*.*"
Sendmessage (Lb&, ~Lb_dir, $4038, Addr(dir$))
Setfocus(%Hwnd)
Waitin >
Salut Roland |
|
|
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 15.05.2006 ▲ |
|
|
|
|
Nico Madysa | |
|
| |
|
|
|
Torsten Rümker | bien sûr serait deine Solution aussi marcher. mais comme so souvent ist, sieht on den forêt avant lauter Bäumen pas. ou bien anders: pourquoi simple wenns aussi schwer allez. [Éditer] Mir fällt grad un, pourquoi je la méthode pas genutzt hatte, je voulais seulement Verzeichnisse avons [/Éditer] merci sur jeden le cas pour qui répondre.
MfG Torsten
PS: je sollte mir vraie lente merken, cela on aucun Cordes transfert peux. |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 15.05.2006 ▲ |
|
|
|
|
Michael Wodrich | [quote-part:8c07f72e55]PS: je sollte mir vraie lente merken, cela on aucun Cordes transfert peux.[/quote-part:8c07f72e55] On peut un peu mogeln... KompilierenMarqueSéparation!
$H Messages.ph
--------------------------
Declare global_txt$
Proc txt$
Parameters derText$
global_txt$ = derText$
Return Addr(global_txt$) geht leider nicht mit "derText$", da nach
EndProc Verlassen der Funktion nicht mehr verfügbar.
--------------------------
Declare LB&
Cls
LB& = Create("LISTBOX",%hWnd,"",0023,0023,0302,0401)
SendMessage (LB&, ~LB_Dir, $4038, txt$("*.*"))
SetFocus(%hWnd)
Programmieren, das spannendste Detektivspiel der Welt. | 16.05.2006 ▲ | |
|
|
|
|
Torsten Rümker | Tja, était alles très hilfreich, malheureusement habe je seulement im Nachhinein gemerkt, le moi cela quoi je là rausbekomme gar pas brauche.
j'ai encore einmal nachgedacht. Alles quoi il me faut, ist qui Possibilité, une Verzeichnisstruktur darzustellen. So une Art Treeview, comment im Windows - Explorer sur qui linken page. Es soll pour une Verzeichnis-sélection-Dialog son, den je chez qui installation meines Wettbewerbsbeitrages verwenden voudrais.
MfG Torsten |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 16.05.2006 ▲ |
|
|
|
|
Uwe ''Pascal'' Niemeier | allô gens! [quote-part:c8bc61b7c5]On peut un peu mogeln... [/quote-part:c8bc61b7c5] oui, pourquoi pas... KompilierenMarqueSéparation Remember: depuis Profan 7.? sommes Literate (Text dans Anführungsstrichen) comme paramètre pour APIs erlaubt... @Torsten: sur meiner inoffiziellen HP [...] liegt un Beispiel pour quelque chose comme, mais pour deine Zwecke ist cela eigendlich überdimensioniert... (TvDemo + FileBrowser) Reicht ChooseDir$ pas?
SeeYou Pascal |
|
|
| |
|
|
|
Torsten Rümker | [quote-part:fbc75d2c1a=Uwe Pascal Niemeier] Reicht ChooseDir$ pas?[/quote-part:fbc75d2c1a] si Je l' Choosedir comme Element sur une eigenen Dialog bekomme, ensuite serait es reichen. So wirkt cela ganze Ding sur dem Bildschirm quelque chose sortir de, au cours de qui installation. Aussi ist es schwieriger Verzeichnisse hinzuzufügen.
MfG Torsten |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 16.05.2006 ▲ |
|
|
|
|
Michael Wodrich | ici une klitzekleine Erweiterung (Pascals Tipp encore pas eingearbeitet).
seulement Verzeichnisse et Laufwerke: KompilierenMarqueSéparation $H c:\profan\include\Messages.ph
--------------------------
Declare global_txt$
Proc txt$
Parameters derText$
global_txt$ = derText$
Return Addr(global_txt$) geht leider nicht mit "derText$", da nach
EndProc Verlassen der Funktion nicht mehr verfügbar.
--------------------------
Declare LB&
Cls
LB& = Create("LISTBOX",%hWnd,"",0023,0023,0302,0401)
SendMessage (LB&, ~LB_Dir, $4038, txt$("*.*"))
SetFocus(%hWnd)
Declare anz&
anz& = GetCount(LB&) - 1
WhileLoop anz&, 0, -1
Case Left$(GetString$(LB&,&loop),1) <> "[" : DeleteString(LB&,&loop)
EndWhile
WaitInput
belle Grüße Michael Wodrich |
|
|
| Programmieren, das spannendste Detektivspiel der Welt. | 16.05.2006 ▲ |
|
|
|
|
Torsten Rümker | je crois avec cela peux je quoi anfangen. Sieht zwar pas so joli aus comment je es volontiers hätte, serait mais sur jeden le cas qui installation optique aufpeppen. la fois un un peu testen. merci pour qui Tips.
MfG Torsten |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 17.05.2006 ▲ |
|
|
|
|
Torsten Rümker | So cela Montrer funktioniert oui pas mal, maintenant brauche je seulement encore Aider um herauszubekommen, si sur une Eintrag simple ou bien doppelt geklickt wurde. je peux oui avec GetFocus abfragen si qui Listbox angeklickt wurde, et ensuite den aktuellen Eintrag auslesen. mais comment merke je si qui Eintrag per Double-cliquez sur selektiert wurde?
MfG Torsten |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 18.05.2006 ▲ |
|
|
|
|
Peter Max Müller | |
|
|