PureBoard

Verfasst: **11.06.2009 19:19**

RSBasic hat geschrieben:Es sind bis jetzt insgesamt 55 neue Codes geplant.

Wow- super

Verfasst: **11.06.2009 22:09**

Was vieleicht praktisch wäre, wäre ein Suche ?
Ich weiß jetzt nicht ob sich die Joomla suche dafür gebräuchlich machen könnte.
Wäre aber praktisch

Verfasst: **12.06.2009 06:56**

Meine Website hatte mal eine SuFu.
Hat auch gut funktioniert.
Aber leider war die Breite der SuFu statisch und konnte nicht angepasst werden.
Daher gab es Darstellungsfehler und habs erstmal rausgenommen.

Falls ich Zeit habe, werde ich mich damit beschäftigen und die statische Größe im Quellcode ändern.

Verfasst: **12.06.2009 16:13**

X360 Andy hat geschrieben:Was vieleicht praktisch wäre, wäre ein Suche ?
Ich weiß jetzt nicht ob sich die Joomla suche dafür gebräuchlich machen könnte.
Wäre aber praktisch

Als Alternative gibt's ja noch die WinAPI Library offline. Da ist denke ich, eine
Suchfunktion vorhanden.

Verfasst: **14.06.2009 22:44**

WinAPI Library 1.1.2 wurde veröffentlicht

Gelöscht:

OpenWindow:
• Icon in der Titelleiste ändern

Verschoben:

Ausgewählter Item ermitteln:
• Arbeitsspeicher -> ListViewGadget

Geändert:
• SetWindowLong -> SetWindowLongPtr (53 Codes geändert)
• GetWindowLong -> GetWindowLongPtr (40 Codes geändert)
• SetClassLong -> SetClassLongPtr (2 Codes geändert)

http://www.api-library.i3h.de oder updaten.

Viel Spaß!

PS: Die neuen Codes werde ich demnächst hinzufügen (nächstes Wochenende).

Verfasst: **16.06.2009 16:17**

Dankeschöö

Verfasst: **16.06.2009 23:40**

Andesdaf hat geschrieben:Dankeschöö

Da schließe ich mich gleich mit an.

Auch von mir ein Dankeschön, Ray.

Gruß Falko

Verfasst: **19.06.2009 21:37**

Großupdate

Hinzugefügt:

ButtonGadget:
• Flacher Button

Desktop:
• Kontextmenü öffnen

ExplorerTreeGadget:
• Anzahl der Einträge ermitteln
• CheckBox entfernen
• Einrückungslänge ändern
• Hintergrundfarbe ändern
• Höhe des Items ermitteln
• Item-Höhe ändern
• Linienfarbe ändern
• Schriftfarbe ändern

Konsole:
• Umlaute anzeigen

Maus und Tastatur:
• Cursorblinkrate der Eingabe einstellen

Menü:
• Bitmap als Item
• Menü-Leiste einfärben

Popup_menü:
• Bitmap als Item

Prozesse:
• Dienst auf Verfügbarkeit überprüfen
• Dienst beenden
• Dienst entfernen
• Dienst erstellen
• Dienst pausieren
• Dienst starten
• Fenstergröße ermitteln
• Fenstergröße wiederherstellen
• Fensterposition ermitteln
• Maximieren
• Minimieren
• Pausierter Dienst fortsetzen

Sonstige:
• Alle Buchstaben in Großbuchstaben umwandeln
• Alle Buchstaben in Kleinbuchstaben umwandeln
• Anzahl der Zeichen eines Strings ermitteln
• Schriftarten auflisten
• Windows-Meldung ausgeben

StringGadget:
• Autovervollständigung

TreeGadget:
• Anzahl der Einträge ermitteln
• CheckBox entfernen
• Einrückungslänge ändern
• Hintergrundfarbe ändern
• Höhe des Items ermitteln
• Item-Höhe ändern
• Linienfarbe ändern
• Schriftfarbe ändern

Dateien:
• Datei-Eigenschaft öffnen

http://www.api-library.i3h.de oder updaten.
Viel Spaß!
Endlich geschafft...

Verfasst: **22.06.2009 14:33**

danke, ich sehe gerade dass du nun schon über 400 Codes gesammelt hast

Verfasst: **25.06.2009 23:01**

@RSBasic
hier ein Anfang der soweit deine API-Snippeds für die Codebausteine
der PB-IDE umwandelt bzw. anpasst.

Vorsicht, die Original-Templates.prefs wird bei Bestätigung mit Ja komplett überschrieben.
Wenn ihr eigene Bausteine schon vorhanden habt, dann bitte manuell aus der erstellten Templates.prefs den Inhalt herauskopieren und in das Original unter
%appdata%\Purebasic\Templates.prefs hineinkopieren.

@All

Wer den Source noch verbessern möchte, kann es gerne tun.

Code: Alles auswählen

;Interface to convert RSBASIC WinAPI-Library to PureBasic Code-Blocks

Procedure Suchen(Pfad$) 
  ;Suche von Ray alias RSBASIC.de
  ;Angepasst durch eine IDEE für sein API-Programm von Falko Lünsmann

  Define EDID
  EDID = ExamineDirectory(#PB_Any,Pfad$,"*.*") 
  If EDID
    While NextDirectoryEntry(EDID)
       Entryname$ = DirectoryEntryName(EDID) 
       If DirectoryEntryType(EDID) = #PB_DirectoryEntry_Directory And Not  Entryname$ = "." And Not Entryname$ = ".."
         WriteStringN(0,"Directory: "+Entryname$)
         Suchen(Pfad$+"\"+Entryname$)
         WriteStringN(0,"CloseDirectory")
       ElseIf DirectoryEntryType(EDID) = #PB_DirectoryEntry_File And Not Entryname$ = "." And Not Entryname$ = ".."
         WriteStringN(0," Template: "+Left(Entryname$,Len(Entryname$)-3))
         WriteStringN(0,"   Comment: "+Left(Entryname$,Len(Entryname$)-3))
         WriteString(0,"   Code: ")
         OpenFile(1,Pfad$+"\"+Entryname$)
         CodeStr$=""
           While Eof(1)=0; PB-Quellcode auslesen
             CodeStr$+ReplaceString(ReadString(1),"\","\\")+"\n"; Korrigiert \ zu \\ und #CRLF zu \n
           Wend
           WriteStringN(0,Left(CodeStr$,Len(CodeStr$)-2))
         CloseFile(1)
         EndIf
     Wend
     FinishDirectory(EDID) 
  EndIf
EndProcedure
If CreateFile(0,"Templates.prefs")
  WriteStringN(0,"TEMPLATES:1.0")
  WriteStringN(0,"")
  WriteStringN(0,"Directory: WinAPI Library")

  Suchen("F:\api\winapi_library\Codes\");Codeliste von RSBASICS Codesnippets

  WriteStringN(0,"CloseDirectory")
  CloseFile(0)
EndIf

Result=MessageRequester("Frage zu PB?","Wollen Sie die Code-Bausteine übertragen?"+#CRLF$+"Bestehende Einträge werden hiermit überschrieben!!",#PB_MessageRequester_YesNo)
If Result= #PB_MessageRequester_Yes       
    CopyFile(GetCurrentDirectory()+"Templates.prefs", GetHomeDirectory()+"appdata\Roaming\PureBasic\Templates.prefs")
EndIf

Um Änderungen machen zu können, habe ich dazu von Flype was gefunden, was sich bestimmt dazu eignet.

http://www.purebasic.fr/english/viewtop ... ates+prefs

Gruß Falko

PureBoard

WinAPI Library (Snippets) (1163 Beispielcodes)

Kleine Erweiterung für die CodeBausteine in PB.