Suchen von unbenutzen Variablen im Source?

Anfängerfragen zum Programmieren mit PureBasic.
Benutzeravatar
Kurzer
Beiträge: 1617
Registriert: 25.04.2006 17:29
Wohnort: Nähe Hamburg

Beitrag von Kurzer »

NicTheQuick hat geschrieben:Sind es viele deklarierte Variablen?
Ist relativ. :-) Notfalls muß ich es so machen.
Mir geht es auch eher um die Elemente von Strukturen - also, ob die noch irgendwo genutzt werden. Zugegeben, viele davon sind fester Bestandteil und es werden durch meine Änderungen nur wenige wegfallen. Trotzdem wäre so eine Such/Anzeige-Funktion innerhalb von PB nett gewesen.

Code: Alles auswählen

Structure ResultRecord
                            ; Aufbau einer Zeile der dynamischen Result-Liste
  Key.s                     
  OtherFields.s[#MaxOtherFields]

  Deleted.b                 
  NoNotification.b          
  VisibleTill.l             
  IfChanged.b								
  OldChecksum.l							
  CurrentChecksum.l					

	Changed.l									
	Valid.l										
  
EndStructure
Global NewList ResultList.ResultRecord()

Structure WinProperty   		; Eigenschaften der Windows
  X.l
  Y.l
  Width.l
  Height.l
EndStructure
Global Dim WindowProperty.WinProperty(4)

Structure ProgramSettings	; Diverse Programmeinstellungen, die zur Laufzeit im Speicher gehalten werden
  IniVersion.l							
  ShowAll.l									
  SaveGUISettingsAtEnd.l		
  ConnectState.l						
  SetAutomatic.l						
  AutoState.l								
  AutoColumnWidth.l					
  MinToSystray.l						
  WindowIsMinimized.l				
  NoActiveQueries.l					
  QuitProgram.l							
  
  ScanAtStart.l							
  MessageAlwaysOnTop.l			
  MinimizeAtQuit.l					
  AskBeforeQuit.l						
  MoreInstances.l						

  UsePlugin.l								
  PluginFile$								

	DBName$										
  DBUser$										
  DBPassword$								
  
  ManualQuery.l							
  AutoQuery.l								
  LastQuery.l								
  NextQuery.l								
  SettingsQueryNo.l					
  SecondsToNextQuery.l			
 	NumFields.l								
  LastResultKey$						
  LastPropertyEntry.l				
 	StopReading.l							

  FieldsHeader.s[#MaxOtherFields + 1]
  FieldsWidth.l[#MaxOtherFields + 1]

EndStructure
Global ProgramSettings.ProgramSettings

Structure Query
  QueryRanAtStart.l[#MaxStatements]	

  Description$[#MaxStatements]			
  QueryActive.l[#MaxStatements]			
  Minutes.l[#MaxStatements]					
  SecondsRemaining.l[#MaxStatements]	
  Messagestring$[#MaxStatements]			
	Selectstring1$[#MaxStatements]
	Selectstring2$[#MaxStatements]
	Fromstring$[#MaxStatements]
	Wherestring$[#MaxStatements]

EndStructure

; Für den Aufruf der Plugin-DLL
Prototype.l DoAction(Key$, OtherColumns$ = "TestColumns")
Prototype.l Configuration()
Global PluginDoAction.DoAction, PluginConfiguration.Configuration

Global Queries.Query									
Global TempQueries.Query							

Global LastTime.l, LastSecond.l 
Global Temp.l, Temp$
Edit by NicTheQuick: Code-Tags gesetzt
"Never run a changing system!" | "Unterhalten sich zwei Alleinunterhalter... Paradox, oder?"
PB 6.12 x64, OS: Win 11 24H2 x64, Desktopscaling: 150%, CPU: I7 12700 H, RAM: 32 GB, GPU: Intel(R) Iris(R) Xe Graphics | NVIDIA GeForce RTX 3070
Useralter in 2025: 57 Jahre.
Antworten